OpenEuphoria

Re: [WIN] closing child windows...

• Posted by Derek Parnell <ddparnell at bigpond.com> Mar 17, 2001
• 394 views

Hi there,
I've sorted out a way to do it.

a) Create a global variable
   global integer Parsing Parsing = 0

b) When np_parse starts, set Parsing to 1.

c) Replace ...

 <  while 1 do
 <       repaintWindow(loading)
with ...
 >  while Parsing do
 >      doEvents(loading_pb1)
 >      doEvents(loading)

d) Create a new global procedure...

   global np_cancelParsing()
       Parsing = 0
   end procedure

e) Set two new event handler in napsterparse.exw.

   onClick[loading_pb1] = routine_id("np_cancelParsing")
   onClose[loading]     = routine_id("np_cancelParsing")

and there you have it!

This will still bring up the main window with whatever had been parsed so
far, but I'm sure you can handle that.

cheers,
Derek Parnell
Melbourne, Australia
"To finish a job quickly, go slower."

----- Original Message -----
From: <leviathan at uswest.net>
To: "EUforum" <EUforum at topica.com>
Sent: Sunday, March 18, 2001 3:01 PM
Subject: [WIN] closing child windows...


>
>
> Heya all!
>
> How would I get a .55.1 child window to let the user close it? I'm not
> all too sure if any other versions let me, but I can't, for the life of
me,
> get this thing to close after pressing the close button on the window?
> (I hope it's sending a WM_CLOSE event... it might be, it might not
> be, who knows...)
>
> TIA,
>
> --"LEVIATHAN"
>
>
>