include('wintools') include('wincontrolworks') func _create(_data) var(ctrl) fvar(old) println(button, ' = new wxButton(this, ID_', upper(button), ', ', Caption, ', wxPoint(', Left, ', ', Top, '), wxSize(', Width, ', ', Height, '));') ctrl = button registerId(ctrl) if(linked(onClick)) createEventArg1(button, 'EVT_BUTTON', 'onClick', _data) end end func initFree() _create('') end func init() lng.decl_priv_var(button, 'wxButton*') if(not linked(doCreate)) fvar(old) old = block.select(BLK_BODY) _create('') block.select(old) end end func doCreate(_data) _create(_data) end