OpenEuphoria

Re: close button dosen't work

• Posted by cklester <cklester at yahoo.com> Dec 25, 2004
• 560 views

don cole wrote:
> 
> Using the following code in Euphoria 2.3:
> }}}
<eucode>
> procedure close(integer a,integer b,sequence p)
>    save_file({getText(EditText5)}&{getText(EditText6)}&{getText(etTop)}&
>             {getText(etLeft)}   &{getText(etRow)}    &{getText(etSpace)}&
>             {getText(etSize)}   &{getText(etAdj)},"label.dat")
>    closeWindow(Window1)
> end procedure
> setHandler(PushButton5,w32HClick,routine_id("close"))
> 
> Works fine when running from the editor but after I bind it the Close button
> (PushButton5) does nothing.
> I deleted out the save routine and still nothing>
> Any ideas?

"close" is a reserved word, isn't it? Maybe that's confusing things. Rename
your procedure to close_x() and it'll probably work fine.

-=ck
"Programming in a state of EUPHORIA."
http://www.cklester.com/euphoria/