Section Header

    + name := LAB_KEY;

    - comment := "Label Key.";

Section Inherit

    + parent_g_label:Expanded GUI_LABEL;

Section Public

    + key:UINTEGER_16;

Creation.


    - create k:UINTEGER_16 :SELF <-

    - make k:UINTEGER_16 <-

Section GUI_LABEL

    - my_width_min :INTEGER <-

    - my_height_min:INTEGER <-

    - my_display_in bmp:GUI_ITEM to (x,y:INTEGER) <-