#=============================================================== # Compagny : 4Js # Developper : PM # Program : $CFGDESI/objects/rtitlefi.tko # Project : ConfDaisy.tko # Date : 23.11.1995 # Last modif. : 23.10.1995 # Explication : Resource managment..., # Take care because the generated class is not FglTitleFirst, # but FglFirstLabel. #--------------------------------------------------------------- Class rTitleFirst { ;# "rWidget" must be first, because it short cuts inherit rLabel ;# some standard method like public geo_x 50 public geo_y 10 protected _geo_bg "" protected _geo_fg "" protected _geo_relief "" protected _res_list "geo_bg geo_relief geo_borderwidth " public int_moveable "Y" public int_show_attr "Y" constructor { config } { set geo_text "First Label" } } ;# end of class