combobox : select using an item text

BlitzMax Forums/MaxGUI Module/combobox : select using an item text

hub(Posted 2007) [#1]
Newbie question :

how to select an item into a combobox with its 'item text'?

t$ = 'mark'
for example select 'mark' into this combobox1 list using t$ value?

dave
mark
eddy

Thanks !


rs22(Posted 2007) [#2]
This is probably how I would do it, though I don't know if it's the best way:
Strict 

Local window:TGadget
Local combobox:TGadget
Local textfield:TGadget
Local button:TGadget

window=CreateWindow("My Window",30,20,200,200)

combobox=CreateComboBox(4,4,120,22,window)
AddGadgetItem combobox,"Short"
AddGadgetItem combobox,"Medium"
AddGadgetItem combobox,"Fat",True
AddGadgetItem combobox,"Humungous"

textfield=CreateTextField(4,40,100,24,window)
button=CreateButton("Button",4,70,100,24,window)

While WaitEvent()
	Select EventID()
		Case EVENT_GADGETACTION
			If EventSource() = button
				Local i
				For i=1 To CountGadgetItems(combobox)
					If GadgetItemText(combobox,i-1) = GadgetText(textfield) SelectGadgetItem(combobox,i-1)
				Next
			EndIf
		Case EVENT_WINDOWCLOSE
			End
	End Select
Wend



hub(Posted 2007) [#3]
Thanks Robbie !