Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Is this a bug?
Message
De
06/05/2005 17:18:23
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01011696
Message ID:
01011803
Vues:
12
I know we can theoretically run the code, but it wouldn't hurt to ALSO say what you think IS the bug.


>
>
>CREATE CURSOR TEST(TEST C(2))
>INSERT INTO TEST(Test) VALUES("T1")
>INSERT INTO TEST(Test) VALUES("T2")
>
>CREATE CURSOR TEST2(TEST C(2))
>INSERT INTO TEST2(Test) VALUES("T1")
>
>PUBLIC oFORM
>oForm = CREATEOBJECT("FORM")
>oForm.Show()
>SELECT TEST
>oForm.ADDOBJECT("combo2","myCombo2")
>SELECT TEST2
>oForm.ADDOBJECT("combo3","myCombo2")
>
>oForm.combo2.visible = .T.
>oForm.combo3.TOP= 80
>oForm.combo3.visible = .T.
>
>DEFINE CLASS myCombo2 AS Combobox
>	rowsourcetype = 3
>	rowsource = "SELECT TEST FROM TEST TO SCREEN NOCONSOLE"
>	TOP = 50
>ENDDEFINE
>
>
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform