OpenEuphoria

Re: LaunchPad -- Screen Shot (so far)

• Posted by Antonio Alessi <a.admin at myway.it> Apr 24, 2006
• 509 views

don cole wrote:
> 
> Al and Antonio,
> 
> This maybe a little off topic but how does one know which tabitem was clicked
> last. (the top tab).
> 
> Don Cole


Hi Don,

a "curious" question with a simple answer:

sequence tabtxt = {}

procedure TAB_Change( integer self, integer event, sequence prm)
	
	? self
	? find( self, tabtxt)
	
end procedure

--- ========= TABctrl created already

for i = 1 to TabNbr do

    tabtxt&= create( TabItem, prm, TABctrl, hor, ver, width, height, 0)
    setHandler( tabtxt[$], w32HClick, routine_id( "TAB_Change"))

end for

antonio