Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Multiselect Option in ListBox
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Re: Multiselect Option in ListBox
Environment versions
Visual FoxPro:
VFP 6 SP5
Miscellaneous
Thread ID:
01120276
Message ID:
01120285
Views:
15
>
>PARAM xTable_Name,xField_Name,xSelected_Value && xTableName,xField_Name helps to create cursor
>DODEFAULT()
>MAIN_TOOLBAR.ENABLED = .F.
>CreateSqlCursor(xTable_Name,xField_Name,"Select_List")
>ThisForm.Xlist1.ROWSOURCE = "Select_List." + xField_Name
>xSelected_Value = ALLTRIM(xSelected_Value)
>IF !EMPTY(xSelected_Value)
>	FOR lnFor = 1 TO ThisForm.Xlist1.ListCount
>       thisform.Xlist1.LIST(lnFor).SELECTED = (thisform.xList1.List(lnFor) $ xSelected_Value) && ERROR AT THIS POINT
>   NEXT
>ENDIF
>
My mistake, sorry:
IF !EMPTY(xSelected_Value)
   FOR lnFor = 1 TO ThisForm.Xlist1.ListCount
       thisform.Xlist1.SELECTED(lnFor) = (thisform.xList1.List(lnFor) $ xSelected_Value) && ERROR AT THIS POINT
   NEXT
ENDIF
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform