include('wintools') include("wincontrolworks") func doMaximum(_data) println(pbar + '->setMaximum(', e_int(_data), ');') end func doMinimum(_data) println(pbar + '->setMinimum(', e_int(_data), ');') end func _create(_data) var(ctlr) println(pbar, ' = new QProgressBar(this);') ctlr = pbar include("wincontrol") if(isndef(Maximum)) doMaximum(Maximum) end if(isndef(Minimum)) doMinimum(Minimum) end if(linked(onValueChanged)) createEventArg1(ctlr, 'valueChanged', 'onValueChanged', 'int', 'int value', 'value'@int) end end func init() lng.decl_priv_var(pbar, 'QProgressBar*') include("wincontrol_init") end func doValue(_data) println(pbar + '->setValue(', Value, ');') end func CurrentValue() return(pbar + '->value()') end