Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Is this a bug?
Message
From
06/05/2005 17:18:23
 
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01011696
Message ID:
01011803
Views:
11
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
>
>
Previous
Reply
Map
View

Click here to load this message in the networking platform