i have Quest about Combobox.
i do "fill" it with AddItem() and want to display 1st Item, how
Code: Select all
Procedure OpenForm()
LOCAL i, iMax := LEN(aPop3)
IF !IsWindowDefined(EMail_1)
Load Window EMail_1
EMail_1.Row := 30
EMail_1.Col := 30
FOR i := 1 TO iMax
EMail_1.PROVIDER.AddItem(aPop3[i][1])
NEXT
// how to set to display 1st Item
EMail_1.PROVIDER.??? := 1
ON KEY ESCAPE OF EMail_1 ACTION EMail_1.Release
CENTER WINDOW EMail_1
Activate Window EMail_1
EndIf
Return
ok got while write this Message
Code: Select all
EMail_1.PROVIDER.VALUE := 1