include('wintools') include("wincontrolworks") func _create(_data) var(ctrl) fvar(old,style_) beginStyle('0') addStyle(isndef(Alignment), 'wxALIGN' + code(upper(Alignment))) style_ = endStyle() println(label, ' = new wxStaticText(this, ID_', upper(label), ', ', Caption, ', wxPoint(', Left, ', ', Top, '), wxSize(', Width, ', ', Height, '),', style_, ');') ctrl = label registerId(label) end func initFree() _create('') end func init() lng.decl_priv_var(label, 'wxStaticText*') if(not linked(doCreate)) fvar(old) old = block.select(BLK_BODY) _create('') block.select(old) end end func doCreate(data) _create(data) end func doCaption(_data) println(label + '->SetLabel(', e_str(_data), ');') end