[clean-list] What did I miss?

[Peter Achten]

Dear Philippos,

Apparantly the toolbar does not work unless you also open menus. If you 
change your Win function into:

Win pst1= pst3
where {
   (ok, pst2)= openWindow 0 flushWin pst1;
   (_, pst3) = openMenu 0 (Menu "File" NilLS []) pst2;   // add an empty 
menu, add items by replacing NilLS
   flushWin= Window "I want to quit" NilLS []}

then you will see that your application does respond to toolbar events.

I will see if this can be fixed in the near future. Thank you for your 
observation.

With kind regards,
Peter Achten

At 09:18 AM 4/6/2006, you wrote:
>Hi, guys.
>Could you people tell me why the program below does not work? Thanx in 
>advance. I want to open a window with a tool bar; on the toolbar, there is 
>an icon of "quit"; if I press the icon, I quit. The trouble is that I 
>press the quit button, but nothing happens.
>
>module toolWin;
>import StdEnv, StdIO;
>Start world
>   # (ok, file, world)= fopen "quit.bmp" FReadData world
>   # (ok, osbit, file)= osReadBitmap file
>   # (ok, world)= fclose file world
>   # bit= toBitmap osbit
>   # attributes= [ ProcessToolbar [ToolbarItem bit (Just "quit") 
> closeProcess]]
>   = startIO  MDI Void Win attributes  world;
>
>Win pst1= pst2
>where {
>   (ok, pst2)= openWindow 0 flushWin pst1;
>   flushWin= Window "I want to quit" NilLS []}
>
>
>
>
>Make Yahoo! Canada your Homepage <http://ca.yahoo.com/bin/set>Yahoo! 
>Canada Homepage
>_______________________________________________
>clean-list mailing list
>clean-list at science.ru.nl
>http://mailman.science.ru.nl/mailman/listinfo/clean-list

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.science.ru.nl/pipermail/clean-list/attachments/20060406/b0db29f7/attachment.html