From: Dirk B. <db...@us...> - 2006-02-09 18:04:25
|
Update of /cvsroot/win32forth/win32forth/doc/classes In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29219/doc/classes Modified Files: Controls.htm Log Message: Some minor changes and some more dexing. Index: Controls.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/doc/classes/Controls.htm,v retrieving revision 1.12 retrieving revision 1.13 diff -C2 -d -r1.12 -r1.13 *** Controls.htm 8 Feb 2006 14:26:34 -0000 1.12 --- Controls.htm 9 Feb 2006 18:04:10 -0000 1.13 *************** *** 1230,1354 **** </p><pre><b><a name="307">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="308">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_HORZ. ! </p><pre><b><a name="309">;Class ! </a></b></pre><p>End of ScrollBar class </p><a name="VertScroll"></a> <h2>VertScroll class ! </h2><pre><b><a name="310">:Class VertScroll <Super ScrollBar ! </a></b></pre><p>Scrollbar control (vertical) ! </p><pre><b><a name="311">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_VERT. ! </p><pre><b><a name="312">;Class </a></b></pre><p>End of VertScroll class </p><a name="SizeBox"></a> <h2>SizeBox class ! </h2><pre><b><a name="313">:Class SizeBox <Super ScrollBar ! </a></b></pre><p>Size box control ! </p><pre><b><a name="314">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_SIZEGRIP. ! </p><pre><b><a name="315">;Class </a></b></pre><p>End of SizeBox class </p><a name="MonthCalendar"></a> <h2>MonthCalendar class ! </h2><pre><b><a name="316">:Class MonthCalendar <Super Control ! </a></b></pre><p>Month Calendar control ! </p><pre><b><a name="317">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="318">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="319">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="320">:M MinSize: ( -- x y) ! </a></b></pre><p>return minimum size required to display a month ! </p><pre><b><a name="321">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: WS_BORDER. ! </p><pre><b><a name="322">;Class </a></b></pre><p>End of MonthCalendar class </p><a name="DateTimePicker"></a> <h2>DateTimePicker class ! </h2><pre><b><a name="323">:Class DateTimePicker <Super Control </a></b></pre><p>Date and Time Picker control ! </p><pre><b><a name="324">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="325">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="326">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="327">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: WS_BORDER. ! </p><pre><b><a name="328">:M SetCustomFormat: ( z"format" -- ) </a></b></pre><p>set the display format for time or date ! </p><pre><b><a name="329">:M GetTime: ( -- hrs min secs ) </a></b></pre><p>get user selected time ! </p><pre><b><a name="330">:M SetTime: ( hr min sec -- ) </a></b></pre><p>set time for user to edit ! </p><pre><b><a name="331">:M GetDate: ( -- day month year ) </a></b></pre><p>get user selected date ! </p><pre><b><a name="332">;Class </a></b></pre><p>End of DateTimePicker class </p><a name="TabControlr"></a> <h2>TabControl class ! </h2><pre><b><a name="333">:Class TabControl <Super Control </a></b></pre><p>Tab control ! </p><pre><b><a name="334">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="335">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="336">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: TCS_FOCUSONBUTTONDOWN. ! </p><pre><b><a name="337">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="338">:M InsertTab: ( index -- ) </a></b></pre><p>tc_item mask and other members must be set ! </p><pre><b><a name="339">:M GetTabInfo: ( index -- ) </a></b></pre><p>tc_item mask member must be set ! </p><pre><b><a name="340">:M SetTabInfo: ( index -- ) </a></b></pre><p>tc_item members must be set ! </p><pre><b><a name="341">:M ClientSize: ( -- x y w h ) </a></b></pre><p>return size of display area ! </p><pre><b><a name="342">:M WindowSize: ( 0 0 width height -- x y w h ) </a></b></pre><p>given display area return window size required ! </p><pre><b><a name="343">:M Enable: ( f -- ) </a></b></pre><p>Enable the control. ! </p><pre><b><a name="344">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="345">:M Setfont: ( handle -- ) </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="346">:M WindowTitle: ( -- null$ ) </a></b></pre><p>SintillaControl asks for window title of parent ! </p><pre><b><a name="347">;Class </a></b></pre><p>End of TabControl class </p><hr /><h1>ExControls -- More (enhanced) classes for none standard windows controls. </h1><hr /><a name="VertButtonBar"></a> <h2>VertButtonBar class ! </h2><pre><b><a name="348">:Class VertButtonBar <super VButtonBar </a></b></pre><p>VertButtonBar control </p><p>This is an enhanced Version of the VButtonBar class. </p><p>Note: this control isn't one of the standard control of MS windows. ! </p><pre><b><a name="349">:M SetFont: { fonthndl \ hb1 -- } </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="350">:M Enable: { flag \ hb1 -- } </a></b></pre><p>Enable the control. ! </p><pre><b><a name="351">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="352">;Class </a></b></pre><p>End of VertButtonBar class </p><a name="HorizButtonBar"></a> <h2>HorizButtonBar class ! </h2><pre><b><a name="353">:Class HorizButtonBar <super HButtonBar </a></b></pre><p>HorizButtonBar control </p><p>This is an enhanced Version of the HButtonBar class. </p><p>Note: this control isn't one of the standard control of MS windows. ! </p><pre><b><a name="354">:M SetFont: { fonthndl \ hb1 -- } </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="355">:M Enable: { flag \ hb1 -- } </a></b></pre><p>Enable the control. ! </p><pre><b><a name="356">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="357">;Class </a></b></pre><p>End of HorizButtonBar class </p><hr><p>Document $Id$</p> --- 1230,1371 ---- </p><pre><b><a name="307">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><a name="HorizScroll"></a> ! <h2>HorizScroll class ! </h2><pre><b><a name="308">:Class HorizScroll <Super ScrollBar ! </a></b></pre><p>Scrollbar control (vorizontal). ! </p><pre><b><a name="309">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_HORZ. ! </p><pre><b><a name="310">;Class ! </a></b></pre><p>End of HorizScroll class </p><a name="VertScroll"></a> <h2>VertScroll class ! </h2><pre><b><a name="311">:Class VertScroll <Super ScrollBar ! </a></b></pre><p>Scrollbar control (vertical). ! </p><pre><b><a name="312">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_VERT. ! </p><pre><b><a name="313">;Class </a></b></pre><p>End of VertScroll class </p><a name="SizeBox"></a> <h2>SizeBox class ! </h2><pre><b><a name="314">:Class SizeBox <Super ScrollBar ! </a></b></pre><p>Size box control. ! </p><pre><b><a name="315">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: SBS_SIZEGRIP. ! </p><pre><b><a name="316">;Class </a></b></pre><p>End of SizeBox class </p><a name="MonthCalendar"></a> <h2>MonthCalendar class ! </h2><pre><b><a name="317">:Class MonthCalendar <Super Control ! </a></b></pre><p>Month Calendar control. ! A month calendar control implements a calendar-like user interface. This ! provides the user with a very intuitive and recognizable method of entering ! or selecting a date. ! </p><pre><b><a name="318">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="319">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="320">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="321">:M MinSize: ( -- x y ) ! </a></b></pre><p>Return minimum size required to display a month. ! </p><pre><b><a name="322">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: WS_BORDER. ! </p><pre><b><a name="323">:M GetDate: ( -- day month year ) ! </a></b></pre><p>Retrieves the currently selected date. ! </p><p><i> day </i> is the day of the month (0-31). ! </p><p><i> Month </i> is the month (January = 1; December = 12) ! </p><p><i> year </i> is the year (1601 - 30827). ! </p><pre><b><a name="324">:M GetToday: ( -- day month year ) ! </a></b></pre><p>Retrieves the date information for the date specified as "today". ! </p><p><i> day </i> is the day of the month (0-31). ! </p><p><i> Month </i> is the month (January = 1; December = 12) ! </p><p><i> year </i> is the year (1601 - 30827). ! </p><pre><b><a name="325">;Class </a></b></pre><p>End of MonthCalendar class </p><a name="DateTimePicker"></a> <h2>DateTimePicker class ! </h2><pre><b><a name="326">:Class DateTimePicker <Super Control </a></b></pre><p>Date and Time Picker control ! </p><pre><b><a name="327">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="328">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="329">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="330">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: WS_BORDER. ! </p><pre><b><a name="331">:M SetCustomFormat: ( z"format" -- ) </a></b></pre><p>set the display format for time or date ! </p><pre><b><a name="332">:M GetTime: ( -- hrs min secs ) </a></b></pre><p>get user selected time ! </p><pre><b><a name="333">:M SetTime: ( hr min sec -- ) </a></b></pre><p>set time for user to edit ! </p><pre><b><a name="334">:M GetDate: ( -- day month year ) </a></b></pre><p>get user selected date ! </p><pre><b><a name="335">;Class </a></b></pre><p>End of DateTimePicker class </p><a name="TabControlr"></a> <h2>TabControl class ! </h2><pre><b><a name="336">:Class TabControl <Super Control </a></b></pre><p>Tab control ! </p><pre><b><a name="337">:M Start: ( Parent -- ) </a></b></pre><p>Create the control. ! </p><pre><b><a name="338">:M ClassInit: ( -- ) </a></b></pre><p>Initialise the class. ! </p><pre><b><a name="339">:M WindowStyle: ( -- style ) </a></b></pre><p>Get the window style of the control. Default style is: TCS_FOCUSONBUTTONDOWN. ! </p><pre><b><a name="340">:M AddStyle: ( n -- ) </a></b></pre><p>Set any additional style of the control. Must be done before the control is created. ! </p><pre><b><a name="341">:M InsertTab: ( index -- ) </a></b></pre><p>tc_item mask and other members must be set ! </p><pre><b><a name="342">:M GetTabInfo: ( index -- ) </a></b></pre><p>tc_item mask member must be set ! </p><pre><b><a name="343">:M SetTabInfo: ( index -- ) </a></b></pre><p>tc_item members must be set ! </p><pre><b><a name="344">:M ClientSize: ( -- x y w h ) </a></b></pre><p>return size of display area ! </p><pre><b><a name="345">:M WindowSize: ( 0 0 width height -- x y w h ) </a></b></pre><p>given display area return window size required ! </p><pre><b><a name="346">:M Enable: ( f -- ) </a></b></pre><p>Enable the control. ! </p><pre><b><a name="347">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="348">:M Setfont: ( handle -- ) </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="349">:M WindowTitle: ( -- null$ ) </a></b></pre><p>SintillaControl asks for window title of parent ! </p><pre><b><a name="350">;Class </a></b></pre><p>End of TabControl class </p><hr /><h1>ExControls -- More (enhanced) classes for none standard windows controls. </h1><hr /><a name="VertButtonBar"></a> <h2>VertButtonBar class ! </h2><pre><b><a name="351">:Class VertButtonBar <super VButtonBar </a></b></pre><p>VertButtonBar control </p><p>This is an enhanced Version of the VButtonBar class. </p><p>Note: this control isn't one of the standard control of MS windows. ! </p><pre><b><a name="352">:M SetFont: { fonthndl \ hb1 -- } </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="353">:M Enable: { flag \ hb1 -- } </a></b></pre><p>Enable the control. ! </p><pre><b><a name="354">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="355">;Class </a></b></pre><p>End of VertButtonBar class </p><a name="HorizButtonBar"></a> <h2>HorizButtonBar class ! </h2><pre><b><a name="356">:Class HorizButtonBar <super HButtonBar </a></b></pre><p>HorizButtonBar control </p><p>This is an enhanced Version of the HButtonBar class. </p><p>Note: this control isn't one of the standard control of MS windows. ! </p><pre><b><a name="357">:M SetFont: { fonthndl \ hb1 -- } </a></b></pre><p>Set the font in the control. ! </p><pre><b><a name="358">:M Enable: { flag \ hb1 -- } </a></b></pre><p>Enable the control. ! </p><pre><b><a name="359">:M Disable: ( -- ) </a></b></pre><p>Disable the control. ! </p><pre><b><a name="360">;Class </a></b></pre><p>End of HorizButtonBar class </p><hr><p>Document $Id$</p> |