Re: bad problem
- Posted by Irv Mullins <irvm at ellijay.com> Aug 07, 2001
- 446 views
----- Original Message ----- From: George Walters <gwalters at sc.rr.com> Subject: Re: bad problem > > I've not done this yet but here is what I did and it did kill the phone.. > > I ran this directly from a dos prompt > > include win32lib.ew > > -- create a control in the window > > constant > TheWindow = create( Window, "Close Window", 0, Default, Default, 200, 100, > 0 ), > CloseButton = create( DefPushButton, "Close Window", TheWindow, 40, 10, 120, > 30, 0 ) > > > -- tell Windows when to do the action > onClick[CloseButton] = system_exec("exw d:/euphoria/training/arf020.exw",1) > WinMain( TheWindow, Normal ) > > I didn't get a chance to click the button but it killed the phone > anyway....Does this mean we have a problem with EU?? > > ..george I don't think you can set an onClick[] event that way.. AFAIK, it needs a routine_id. Besides which, system_exec is a function, and returns success/fail code, so what your progam is doing is calling system_exec on startup, and assigning the return value to the onClick event. Pretty much guaranteed not to work. Try this instead: -- code generated by Win32Lib IDE v0.10.5 include Win32Lib.ew without warning ---- -- Window Window1 global constant Window1 = create( Window, "Window1", 0, Default, Default, 400, 300, 0 ) global constant PushButton2 = create( PushButton, "PushButton2", Window1, 52, 16, 90, 30, 0 ) ---- procedure PushButton2_onClick () atom ok ok = system_exec("exw d:/euphoria/training/arf020.exw",1) -- try zero, also end procedure onClick[PushButton2] = routine_id("PushButton2_onClick") WinMain( Window1, Normal )