General information
Category:
Coding, syntax & commands
myobj=createobject("myform")
myobj.show
read events
define class myform as form
top=20
left=20
height=300
width=300
caption="First"
add object mycmd as commandbutton with;
top=20,;
left=20,;
height=50,;
width=100,;
caption="Second Form"
procedure mycmd.click
clear read
=myfun()
endproc
enddefine
function myfun()
newobj=createobject("secondform")
newobj.show
read events
return
define class secondform as form
top=20
left=400
height=300
width=300
caption="Second"
enddefine
I want to show the first form, and then click the cmmand button to show the second form. But it cannot show it.
Please help me!
Thank you!
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only