How to refresh TTabControl()/(SysTabControl32 noption?
Posted: Thu Jan 17, 2008 5:26 am
Hi,
otabs:=TTabControl():Redefine( 200, oDlg )
otabs:baction:={||sto0209(otabs)}
...
return
function sto0209(otabs)
do case
case otabs:noption==1
obrow1:show()
case otabs:noption==2
do something
otabs:noption:=1
otabs:refresh() // can't change otabs display
end
return
Best regards!
Shuming Wang
otabs:=TTabControl():Redefine( 200, oDlg )
otabs:baction:={||sto0209(otabs)}
...
return
function sto0209(otabs)
do case
case otabs:noption==1
obrow1:show()
case otabs:noption==2
do something
otabs:noption:=1
otabs:refresh() // can't change otabs display
end
return
Best regards!
Shuming Wang