Hey this is nice! A Faster way to populate and retrieve information!!! Nice Nice Nice.
thanks
Edit:
I was playing with the new 'things' like SyncDataSource() & KeysFromList$ and I'm attempting to run this code
The gadgetlist report something different - address?
I read the source but I can't imagine how you can to add from my_list the field 'valore' to the gadgetlist...
thanks
Edit:
I was playing with the new 'things' like SyncDataSource() & KeysFromList$ and I'm attempting to run this code
Strict Local window:TGadget Local listbox:TGadget window=CreateWindow("My Window",30,20,200,400) listbox=CreateListBox(0,0,ClientWidth(window),ClientHeight(window),window) SetGadgetLayout listbox,1,1,1,1 Type oggetto Field valore:String End Type Global my_list:tlist = New tlist For Local i = 1 To 100 Local og:oggetto = New oggetto og.valore = String(i) my_list.addlast og Next listbox.SetDataSource my_list While WaitEvent() Print CurrentEvent.ToString() Select EventID() Case EVENT_GADGETSELECT Local i=EventData() 'what got selected? If i=-1 Exit 'test for deselection Local src$[] 'a string array to test eventextra src=String [] EventExtra() 'cast datasource to string array Notify "Select:"+src[i] 'combine datasource and index Case EVENT_WINDOWCLOSE End End Select Wend
The gadgetlist report something different - address?
I read the source but I can't imagine how you can to add from my_list the field 'valore' to the gadgetlist...