Article ID: 132227
Article Last Modified on 2/11/2000
DEFINE CLASS myform AS form
ADD OBJECT cmd1 as commandbutton WITH ;
top = 10, ;
left = 10
ENDDEFINE
PUBLIC MyForm
MyForm = CREATEOBJECT("MyForm") && Create a new object
MyForm.Show && Show the form
Read Events && Keep the event loop alive
DEFINE CLASS myform AS form
ADD OBJECT cmd1 as commandbutton WITH ;
top = 60, ;
left = 60
ENDDEFINE
To cancel this code, click the Command box for this form, and click Close.
Then on the Visual FoxPro menu, on the Program menu, click Cancel.
Additional query words: VFoxWin OOP
Keywords: KB132227