Win32Forth
Win32Forth:CLASS Child-Window <Super Window
Child-Window is the base class for all child windows.
The windows has a parent, which is the object address, not the window handle. This allows the child to send messages to its parent.
:M ClassInit: ( -- )
Initialise the class.
:M SetParent: ( parent -- )
Set the object address of the parent window.
:M GetParent: ( -- parent )
Get the object address of the parent window.
:M SetID: ( n -- )
Set the ID for this child window.
:M GetID: ( -- n )
Get the ID for this child window.
:M WindowStyle: ( -- style )
User windows should override the WindowStyle: method to set the window style. Default is WS_CHILD and WS_VISIBLE.
:M WindowTitle: ( -- Zstring )
User windows should override the WindowTitle: method to set the window caption. Default is "".
:M Start: ( Parent -- )
Create this child window. Parent is the object address of the parent window.
:M AutoSize: ( -- )
Size the window to fit into the client area of the parent window.
;Class
End of Child-Window class
Document $Id: Childwnd.htm,v 1.11 2007/05/26 10:24:12 dbu_de Exp $