Update of /cvsroot/win32forth/win32forth/src/lib
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv23692/win32forth/src/lib
Modified Files:
TrayWindow.f
Log Message:
gah:moved MethodExecute and MethodCatch to Forth vocabulary , moved get-mouse-xy into generic.f (to reduce dependancies) and made thread safe.Fixed bug in constants when wincon.dll isn't available
Index: TrayWindow.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/TrayWindow.f,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** TrayWindow.f 15 Jan 2006 09:25:50 -0000 1.1
--- TrayWindow.f 21 May 2007 09:57:26 -0000 1.2
***************
*** 15,18 ****
--- 15,20 ----
cr .( Loading TrayWindow class...)
+ Require Window.f
+
anew -TrayWindow.f
***************
*** 47,51 ****
:M DefaultIcon: ( -- hIcon )
! \ *G Get the handle of the icon whitch should be added to the traybar.
DefaultIcon: super ;M
--- 49,53 ----
:M DefaultIcon: ( -- hIcon )
! \ *G Get the handle of the icon which should be added to the traybar.
DefaultIcon: super ;M
|
