From: Jos v.d.V. <jo...@us...> - 2006-07-05 14:38:49
|
Update of /cvsroot/win32forth/win32forth/apps/ForthForm In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv18983/apps/ForthForm Modified Files: FORMOBJECT.F Log Message: Jos: Removed the duplicate hWndParent Index: FORMOBJECT.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/apps/ForthForm/FORMOBJECT.F,v retrieving revision 1.11 retrieving revision 1.12 diff -C2 -d -r1.11 -r1.12 *** FORMOBJECT.F 29 May 2006 17:13:14 -0000 1.11 --- FORMOBJECT.F 5 Jul 2006 14:38:43 -0000 1.12 *************** *** 1509,1514 **** if s" MultiStatusBar TheStatusBar" append&crlf then GetSuperclass: self DIALOG-CLASS = \ only for dialogwindow super class ! if s" 0 value hWndParent \ window handle of the parent of form" append&crlf ! SaveScreen? if frmXPos #append frmYPos #append s" 2value XYPos \ save screen location of form" append&crlf --- 1509,1513 ---- if s" MultiStatusBar TheStatusBar" append&crlf then GetSuperclass: self DIALOG-CLASS = \ only for dialogwindow super class ! if SaveScreen? if frmXPos #append frmYPos #append s" 2value XYPos \ save screen location of form" append&crlf |