Re: -Sigh-
- Posted by Euman <euman at bellsouth.net> Feb 07, 2001
- 373 views
------=_NextPart_000_000E_01C09143.55C3B720 charset="iso-8859-1" This might help out some: </snip> without warning include win32lib.ew constant Btn1=3Dcreate(PushButton,"Open Win2",Win1,5,5,100,30,0), Btn2=3Dcreate(PushButton,"Back to Win1",Win2,5,5,100,30,0) procedure onClick_Btn1() openWindow(Win2,Normal) setVisible(Win1, False) end procedure onClick[Btn1]=3Droutine_id("onClick_Btn1") procedure onClick_Btn2() openWindow(Win1,Normal) setVisible(Win2, False) end procedure onClick[Btn2]=3Droutine_id("onClick_Btn2") procedure clean_up() Freew32Library() end procedure onDestroy[Win1] =3D routine_id("clean_up") WinMain( Win1, Normal ) <snip\> Euman ----- Original Message -----=20 From: Paul Kerslake=20 To: EUforum at topica.com=20 Sent: Wednesday, February 07, 2001 19:14 Subject: -Sigh- Hi again. I've had a lot of trouble with win32lib programming and I've = decided to go back to the list. So here's the question, it's nice and = simple: How do I create a *window* NOT a message box, from a pushButton using = onClick? -Bye ------=_NextPart_000_000E_01C09143.55C3B720 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>This might help out some:</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2></snip></FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>without warning</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>include win32lib.ew</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial=20 1=3Dcreate(PushButton,"Open=20 Win2",Win1,5,5,100,30,0),<BR>Btn2=3Dcreate(PushButton,"Back to=20 Win1",Win2,5,5,100,30,0)</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>procedure=20 onClick_Btn1()<BR>openWindow(Win2,Normal)<BR>setVisible(Win1, = False)<BR>end=20 <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>procedure=20 onClick_Btn2()<BR>openWindow(Win1,Normal)<BR>setVisible(Win2, = False)<BR>end=20 <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>procedure = clean_up()<BR>Freew32Library()<BR>end=20 procedure</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>onDestroy[Win1] =3D=20 routine_id("clean_up")<BR>WinMain( Win1, Normal )<BR></FONT></DIV> <DIV><FONT face=3DArial size=3D2><snip\></FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Euman</DIV></FONT> <BLOCKQUOTE dir=3Dltr=20 style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; = BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px"> <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV> <DIV=20 style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: = black"><B>From:</B>=20 <A title=3Dpaulk at uniserve.com href=3D"mailto:paulk at uniserve.com">Paul = Kerslake</A>=20 </DIV> <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A = title=3DEUforum at topica.com=20 href=3D"mailto:EUforum at topica.com">EUforum at topica.com</A> </DIV> <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Wednesday, February 07, = 2001=20 19:14</DIV> <DIV style=3D"FONT: 10pt arial"><B>Subject:</B> -Sigh-</DIV> <DIV><BR></DIV> <DIV><FONT face=3DArial size=3D2>Hi again.</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> I've had a lot of = trouble with=20 win32lib programming and I've decided to go back to the list. So = here's the=20 question, it's nice and simple:</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>How do I create a *window* NOT a = message box,=20 from a pushButton using onClick?</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial = __________________ r/tag01</A></PRE></BLOCKQUOTE> ------=_NextPart_000_000E_01C09143.55C3B720--