include('wintools') include('wincontrolworks') func _create(_data) var(ctrl) println(statbar, ' = new wxStatusBar(this, ID_'+upper(statbar)+');') ctrl = statbar registerId(ctrl) end func initFree() _create('') end func init() lng.decl_priv_var(statbar, 'wxStatusBar*') if(not linked(doCreate)) fvar(old) old = block.select(BLK_BODY) _create('') block.select(old) end end func doCreate(_data) _create(_data) end func doText(_data) println(statbar + '->SetStatusText(', e_str(Text), ');') event(onText) end