On Wed, 2012-06-27 at 03:44 -0700, Valeriu wrote:
> Good day!
>
> How to select the selected items from the list ? ....
> Thank you.
>
> My code: ???
>
>
> Dim i As Integer
> Dim ListGlobals As String
> ListGlobals = ""
> Select Message.Question("We delete the Global(s) " & File1.Item.Selected &
> ", yagree ?...", "Yes", "No", "Don't know")
> Case 1
> 'For i = File1.Count To 1 Step -1
> For i=0 to File1.Count-1
> If File1.Item.Selected = True Then
> 'File1.MoveCurrent
> ListGlobals = ListGlobals & Trim(File1.Item.Text) & "|"
> Endif
> Next
> Message(ListGlobals)
> Case 2
> Return
> End Select
> Hi Valeriu, See the attached project source archive. regards Bruce
lvwmultiselect-0.0.1.tar.gz
Description: application/compressed-tar
------------------------------------------------------------------------------ Live Security Virtual Conference Exclusive live event will cover all the ways today's security and threat landscape has changed and how IT managers can respond. Discussions will include endpoint security, mobile security and the latest in malware threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
