Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Running down a listbox
Message
De
24/03/2004 09:46:23
Claudio Rola
EY
Fortaleza, Brésil
 
 
À
24/03/2004 09:25:08
Kurt Vanhauwaert
Kv-Computing
Belgique
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Running down a listbox
Divers
Thread ID:
00889225
Message ID:
00889244
Vues:
20
Hi Kurt,
cText=""
thiform.lockscreen=.t.
myoldidx = ThisForm.lbxListbox.listindex
FOR iCounter = 1 TO ThisForm.lbxListbox.ListCount
  ThisForm.lbxListbox.listindex=iCounter
  cText=cText + alltrim(ThisForm.lbxListbox.value) + CHR(13)
ENDFOR
ThisForm.lbxListbox.listindex = myoldidx
thiform.lockscreen=.f.
HTH

Claudio
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform