Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Columns in a ComboBox
Message
De
19/07/2002 08:14:51
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00680207
Message ID:
00680370
Vues:
25
I was hoping that I would not have to create a 'dummy header' record in my data, but looks like that may be the only way. Thanks for your input.


>Not really but you can do something like this...
>
>LOCAL lnI
>
>CREATE CURSOR myCursor (cId C(5), cCode C(10), cName C(15))
>INSERT INTO myCursor VALUES ("Id","Code","Name")
>INSERT INTO myCursor VALUES ("2","001","Jayesh Patel")
>INSERT INTO myCursor VALUES ("3","001","John Smith")
>INSERT INTO myCursor VALUES ("4","001","Jenny Brown")
>INSERT INTO myCursor VALUES ("5","001","Yair Alan Griver")
>
>DEFINE POPUP MyPopup MARGIN RELATIVE COLOR SCHEME 4
>GO TOP
>lnI = 1
>SCAN
> lcBar = "DEFINE BAR " + STR(lnI) + " OF myPopup PROMPT '" + PADR(cId,5) + "|" + PADR(cCode,10) + "|" + PADR(cName,15) + "'"
> IF lnI = 1
> lcBar = lcBar + "COLOR RGB(192,192,192)"
> ENDIF
> &lcBar
> lnI = lnI + 1
>ENDSCAN
>Thisform.combo1.RowSourceType = 9
>Thisform.combo1.RowSource = "MyPopUp"
>
>
>>I have a combobox with 3 columns in the drop-down. Is there anyway to add headings to the 3 columns?
>>
>>TIA
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform