1. Close Button

Is ther a way I can access the Close Button (the little square with an X in
it located in the upper right hand corner of of window) so I can MessageBox
"Are you sure you want to close" or do I have to create my own button?

If I use win32HClose the window closes even if I select "No".

don cole
SF

new topic     » topic index » view message » categorize

2. Re: Close Button

don, try this on for size:

proecdure Main_Close( integer pSelf, integer pEvent, sequence pParams )
atom ret

    ret = message_box( "Are you sure you want to close?", "Close",
MB_YESNO+MB_ICONQUESTION )

    if ret = IDNO then
        returnValue(-1)    -- cancel closing
    end if

end procedure
setHandler( Main, w32HClose, routine_id("Main_Close") )




On Mon, 29 Nov 2004 01:17:13 -0800, don cole <guest at rapideuphoria.com> wrote:
> 
> posted by: don cole <doncole at pacbell.net>
> 
> Is ther a way I can access the Close Button (the little square with an X in
> it located in the upper right hand corner of of window) so I can MessageBox
> "Are you sure you want to close" or do I have to create my own button?
> 
> If I use win32HClose the window closes even if I select "No".
> 
> don cole
> SF
> 
> 
> 
>

new topic     » goto parent     » topic index » view message » categorize

3. Re: Close Button

Greg Haberek wrote:
> 
> don, try this on for size:
> 
> proecdure Main_Close( integer pSelf, integer pEvent, sequence pParams )
> atom ret
> 
>     ret = message_box( "Are you sure you want to close?", "Close",
> MB_YESNO+MB_ICONQUESTION )
> 
>     if ret = IDNO then
>         returnValue(-1)    -- cancel closing
>     end if
> 
> end procedure
> setHandler( Main, w32HClose, routine_id("Main_Close") )
> 
Thank you and that's what I thought about IE Microsoft don't want you to
 install
another browser.

Don cole
SF
How 'bout them niners (local joke).

new topic     » goto parent     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu