[Gambas-user] How to get listbox selection?

[Dimitris Anogiatis]

Demostheni,

An katalava kala thes na vlepeis oles tis epiloges pou exeis kanei
sto listbox se multiple mode, etsi?

Exo ftiaxei mia synartisi pou kanei akrivos afto to pragma.

'--------------------------------------------------------------------------------------------------------
PUBLIC FUNCTION multipleSelections(targetLB AS ListBox) AS String
  DIM targetCount AS Integer
  DIM foundSelected AS Integer
  DIM Res AS String

  targetCount = 0
  foundSelected = 0
  DO WHILE targetCount < targetLB.Count
   IF targetLB[targetCount].selected = TRUE THEN
    Res &= targetLB[targetCount].Text & "|"
    INC foundSelected
   ENDIF
  INC targetCount
  LOOP

IF foundSelected = 0 THEN
    RETURN "Nothing found"
  ELSE
    RETURN Left(Res, Len(Res) - 1)
ENDIF

END
'--------------------------------------------------------------------------------------------------------

gia na tin xrisimopoihseis tin kaleis me to parakato styl

tmpStr = multipleSelections(myListbox)

kai tha sou vgalei san apotelesma to exeis

"Item1|Item3|item5"

Pou einai ta onomata twn stoixeiwn pou dialexes sto listbox.

an xreiazesai to index tou kathe stoixeiou prepei na kaneis allages stin
synartisi.

Elpizo na voithisa, kai oti allo xreiazetai pes mou.

Regards,
Dimitris

2009/9/7 Demosthenes Koptsis <demosthenesk at ...626...>

> Hi to all,
>
> how can we get the selection of a multiple mode listbox?
>
> return an array of selected items or something?
>
> --
>
> Γεια χαρα σε όλους!!!
>
> Regards,
>
> Demosthenes Koptsis
>
>
> ------------------------------------------------------------------------------
> Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
> trial. Simplify your report design, integration and deployment - and focus
> on
> what you do best, core application coding. Discover what's new with
> Crystal Reports now.  http://p.sf.net/sfu/bobj-july
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>