Menu
▾
▴
[Win32forth-cvs] win32forth/Help/hdb Help.cfg, 1.7, 1.8 HelpCls.tv, 1.11, 1.12 HelpWrd.hdb, 1.15, 1.16 HelpWrd.ndx, 1.15, 1.16 HelpWrd.tv, 1.14, 1.15 HelpWrd.txt, 1.15, 1.16
|
From: George H. <geo...@us...> - 2012-01-17 21:07:51
|
Update of /cvsroot/win32forth/win32forth/Help/hdb
In directory vz-cvs-4.sog:/tmp/cvs-serv9611/hdb
Modified Files:
Help.cfg HelpCls.tv HelpWrd.hdb HelpWrd.ndx HelpWrd.tv
HelpWrd.txt
Log Message:
Added checksum and updated database
Index: HelpCls.tv
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpCls.tv,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** HelpCls.tv 18 Nov 2011 11:40:15 -0000 1.11
--- HelpCls.tv 17 Jan 2012 21:07:46 -0000 1.12
***************
*** 1,2291 ****
! 0 tvn| CLASSROOT| tvd| 5516|
1 tvn| -methods-| tvd| 0|
! -2 tvn| CLASSINIT:| tvd| 5517|
! -2 tvn| ~:| tvd| 5518|
! -2 tvn| ADDR:| tvd| 5519|
! -2 tvn| PRINT:| tvd| 5520|
! 1 tvn| OBJECT| tvd| 5521|
2 tvn| -methods-| tvd| 0|
! -3 tvn| GET:| tvd| 5522|
! -3 tvn| PUT:| tvd| 5523|
[...4553 lines suppressed...]
! -4 tvn| FIELDNAME:| tvd| 8580|
! -4 tvn| GETINT:| tvd| 8581|
! -4 tvn| GETDOUBLE:| tvd| 8582|
! -4 tvn| GETFLOAT:| tvd| 8583|
! -4 tvn| GETSTR:| tvd| 8584|
! -4 tvn| GETBLOB:| tvd| 8585|
! -4 tvn| ISNULL?:| tvd| 8586|
! -4 tvn| NEXTROW:| tvd| 8587|
! -4 tvn| (BIND):| tvd| 8588|
! -4 tvn| BINDINT:| tvd| 8589|
! -4 tvn| BINDDOUBLE:| tvd| 8590|
! -4 tvn| BINDFLOAT:| tvd| 8591|
! -4 tvn| BINDSTR:| tvd| 8592|
! -4 tvn| BINDBLOB:| tvd| 8593|
! 1 tvn| STRING| tvd| 8600|
2 tvn| -methods-| tvd| 0|
! -3 tvn| GET:| tvd| 8601|
! -3 tvn| PUT:| tvd| 8602|
! -3 tvn| ADD:| tvd| 8603|
! -3 tvn| APPEND:| tvd| 8604|
Index: Help.cfg
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/Help.cfg,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** Help.cfg 18 Nov 2011 01:36:48 -0000 1.7
--- Help.cfg 17 Jan 2012 21:07:46 -0000 1.8
***************
*** 3,7 ****
[WindowW] 1021
[WindowH] 708
! [SplitterV] 282
[SplitterH] 112
\ No newline at end of file
--- 3,7 ----
[WindowW] 1021
[WindowH] 708
! [SplitterV] 285
[SplitterH] 112
\ No newline at end of file
Index: HelpWrd.txt
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.txt,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** HelpWrd.txt 18 Nov 2011 11:40:15 -0000 1.15
--- HelpWrd.txt 17 Jan 2012 21:07:46 -0000 1.16
***************
*** 1447,1453 ****
CREATE USERCONFIG$
BYTES &PS
- : (CLASSINIT) ( n1 -- )
- : (CLASSINIT) ( x y width height -- )
: (CLASSINIT) ( -- )
CONSTANT 1/1
CONSTANT 1/2
--- 1447,1453 ----
CREATE USERCONFIG$
BYTES &PS
: (CLASSINIT) ( -- )
+ : (CLASSINIT) ( x y width height -- )
+ : (CLASSINIT) ( n1 -- )
CONSTANT 1/1
CONSTANT 1/2
***************
*** 1493,1512 ****
: BUTTON+H ( -- n1 )
: BUTTON+V ( -- n1 )
- INT BVOFFSET \ Vertical offset
INT BVOFFSET \ vertical offset
INT BWIDTH
INT BX
INT BY
! :M CLASSINIT: ( -<toolbarname>- )
! \ follow by .BMP toolbar filename
! :M CLASSINIT: ( x y width height -- )
:M CLASSINIT: ( -- )
:M CLASSINIT: ( -- )
:M CLASSINIT: ( -- )
:M CLASSINIT: ( -- )
! :M CLASSINIT: ( editWidth -- )
! :M CLASSINIT: ( editWidth -- )
! :M CLASSINIT: ( n1 -- )
! :M CLASSINIT: ( n1 -- )
:M CLOSE: ( -- )
:CLASS COMBOFIELD
--- 1493,1512 ----
: BUTTON+H ( -- n1 )
: BUTTON+V ( -- n1 )
INT BVOFFSET \ vertical offset
+ INT BVOFFSET \ Vertical offset
INT BWIDTH
INT BX
INT BY
! :M CLASSINIT: ( n1 -- )
! :M CLASSINIT: ( n1 -- )
:M CLASSINIT: ( -- )
+ :M CLASSINIT: ( editWidth -- )
:M CLASSINIT: ( -- )
+ :M CLASSINIT: ( editWidth -- )
:M CLASSINIT: ( -- )
+ :M CLASSINIT: ( -<toolbarname>- )
+ \ follow by .BMP toolbar filename
:M CLASSINIT: ( -- )
! :M CLASSINIT: ( x y width height -- )
:M CLOSE: ( -- )
:CLASS COMBOFIELD
***************
*** 1740,1744 ****
CONSTANT THROW_NO_FIND_VAR
CONSTANT THROW_NO_WM
! CONSTANT THROW_OBJ_EXPO
CONSTANT THROW_UNDEF_METH
CONSTANT THROW_ZERO_BITS
--- 1740,1744 ----
CONSTANT THROW_NO_FIND_VAR
CONSTANT THROW_NO_WM
! CONSTANT THROW_OBJ_EXPOSED
CONSTANT THROW_UNDEF_METH
CONSTANT THROW_ZERO_BITS
***************
*** 1836,1841 ****
\ return the indexed element width for a class
: @WORD ( -<word>- addr )
- :M ADD: ( n/d -- )
:M ADD: ( a1 n1 -- )
:M ADDR: ( -- n1 )
:M ADDR: ( -- addr )
--- 1836,1841 ----
\ return the indexed element width for a class
: @WORD ( -<word>- addr )
:M ADD: ( a1 n1 -- )
+ :M ADD: ( n/d -- )
:M ADDR: ( -- n1 )
:M ADDR: ( -- addr )
***************
*** 1890,1896 ****
DEFER CLASSINIT ( -- )
\ send ClassInit: to newObject
- :M CLASSINIT:
:M CLASSINIT: ( -- )
\ Initialise the object. The coordinates are set to zero.
: CLASSPOINTER? ( class -- f )
:CLASS CLASSROOT
--- 1890,1896 ----
DEFER CLASSINIT ( -- )
\ send ClassInit: to newObject
:M CLASSINIT: ( -- )
\ Initialise the object. The coordinates are set to zero.
+ :M CLASSINIT:
: CLASSPOINTER? ( class -- f )
:CLASS CLASSROOT
***************
*** 4487,4494 ****
:M CLASSINIT: ( -- )
GDICOLORREF COLOR
- :M CREATE: ( -- f )
- \ Creates a logical brush with the specified bitmap pattern.
- :M CREATE: ( -- f )
- \ Create the brush with the current color.
:M CREATE: ( lplb -- f )
\ The Create function creates a logical brush that has the specified style, color, and pattern.
--- 4487,4490 ----
***************
*** 4496,4499 ****
--- 4492,4497 ----
:M CREATE: ( -- f )
\ Create the brush with the current style and color.
+ :M CREATE: ( -- f )
+ \ Creates a logical brush with the specified bitmap pattern.
:M CREATE: ( lpPackedDIB iUsage -- f )
\ The Create function creates a logical brush that has the pattern specified
***************
*** 4513,4516 ****
--- 4511,4516 ----
\ DIB_PAL_COLORS | A color table is provided and consists of an array of 16-bit indexes into the logical palette of the device context into which the brush is to be selected. |
\ DIB_RGB_COLORS | A color table is provided and contains literal RGB values. |
+ :M CREATE: ( -- f )
+ \ Create the brush with the current color.
:CLASS GDIBRUSH
:CLASS GDIBRUSH
***************
*** 5925,5934 ****
RECORD: &TEXTMETRIC
:M ADDR: ( -- addr )
! :M ADDR: ( -- addr )
! \ Get the address of the COLORREF struct
:M ADDR: ( -- addr )
\ Get the address of the point struct.
:M ADDR: ( -- addr )
! \ Get the address of the SIZE struct
BYTE B
:M CHOOSE: ( hWnd -- f )
--- 5925,5934 ----
RECORD: &TEXTMETRIC
:M ADDR: ( -- addr )
! \ Get the address of the SIZE struct
:M ADDR: ( -- addr )
\ Get the address of the point struct.
:M ADDR: ( -- addr )
! \ Get the address of the COLORREF struct
! :M ADDR: ( -- addr )
BYTE B
:M CHOOSE: ( hWnd -- f )
***************
*** 6580,6583 ****
--- 6580,6584 ----
VALUE BUILDTYPE \ EXE or DLL
\ EXTERNAL
+ : CHECKSUM ( -- n )
: COMPACT ( -- )
: CONSOLEBOOT ( -- )
***************
*** 8532,8540 ****
:M CLEARERRORS: ( -- )
\ Clears the FIFO error queue
- :M CLOSE: ( -- )
- \ Closes the cursor. Another query can be executed on the cursor once it has been closed.
:M CLOSE: ( -- flag )
\ Closes the database connection. The COM component still exists and a new
\ connection may be made if desired.
:M COMMIT: ( -- )
\ Commit all changes in the current transaction to the database.
--- 8533,8541 ----
:M CLEARERRORS: ( -- )
\ Clears the FIFO error queue
:M CLOSE: ( -- flag )
\ Closes the database connection. The COM component still exists and a new
\ connection may be made if desired.
+ :M CLOSE: ( -- )
+ \ Closes the cursor. Another query can be executed on the cursor once it has been closed.
:M COMMIT: ( -- )
\ Commit all changes in the current transaction to the database.
***************
*** 9026,9030 ****
\ condition exists if a program directly alters the contents of BLK.
: BLKMESSAGE ( n1 -- )
- CONSTANT BLOCK
: BLOCK ( u -- a-addr )
\ ANSI Block
--- 9027,9030 ----
***************
*** 9042,9045 ****
--- 9042,9046 ----
\ At the conclusion of the operation, the block buffer pointed to by a-addr is the
\ current block buffer and is assigned to u.
+ CONSTANT BLOCK
CONSTANT BLOCK-EXT
VALUE BLOCKHANDLE \ W32F Block extra
***************
*** 9253,9258 ****
\ Set any additional style of the control. Must be done before the control
\ is created.
- \ If you need more than one group of radio buttons within a dialog you must
- \ add the BS_GROUP style to the first button of each group.
:M ADDSTYLE: ( n -- )
\ Set any additional style of the control. Must be done before the control
--- 9254,9257 ----
***************
*** 9261,9264 ****
--- 9260,9265 ----
\ Set any additional style of the control. Must be done before the control
\ is created.
+ \ If you need more than one group of radio buttons within a dialog you must
+ \ add the BS_GROUP style to the first button of each group.
:CLASS BITMAPBUTTON
:CLASS BITMAPBUTTON
***************
*** 9269,9274 ****
:CLASS CHECKBOX
:M CHECKBUTTON: ( -- )
- \ Set the button state to checked.
:M CHECKBUTTON: ( -- )
:M CLASSINIT: ( -- )
\ Initialise the class.
--- 9270,9275 ----
:CLASS CHECKBOX
:M CHECKBUTTON: ( -- )
:M CHECKBUTTON: ( -- )
+ \ Set the button state to checked.
:M CLASSINIT: ( -- )
\ Initialise the class.
***************
*** 9284,9290 ****
\ Initialise the class.
:M CLOSE: ( -- )
- \ DeleteBitmap: self
- :M CLOSE: ( -- )
\ DeleteIcon: self
:CLASS DEFPUSHBUTTON
:CLASS DEFPUSHBUTTON
--- 9285,9291 ----
\ Initialise the class.
:M CLOSE: ( -- )
\ DeleteIcon: self
+ :M CLOSE: ( -- )
+ \ DeleteBitmap: self
:CLASS DEFPUSHBUTTON
:CLASS DEFPUSHBUTTON
***************
*** 10680,10683 ****
--- 10681,10687 ----
:CLASS COMBOLISTBOX
:M DELETESTRING: ( index -- )
+ \ Delete a string.
+ \ index specifies the zero-based index of the string to delete.
+ :M DELETESTRING: ( index -- )
\ Delete a string from the list box.
\ index specifies the zero-based index of the string to be deleted.
***************
*** 10685,10691 ****
\ cannot contain more than 32,767 items. Although the number of items is restricted, the total
\ size in bytes of the items in a list box is limited only by available memory.
- :M DELETESTRING: ( index -- )
- \ Delete a string.
- \ index specifies the zero-based index of the string to delete.
:M DISABLE: ( -- )
\ Disable the control.
--- 10689,10692 ----
***************
*** 13173,13182 ****
:M CLASSINIT:
:M CLASSINIT:
:M CLASSINIT: ( check_flag -- )
- :M CLASSINIT: ( -- )
:M CLASSINIT:
:M CLASSINIT:
:M CLASSINIT: ( -- )
! :M CLASSINIT:
:M CLASSINIT: ( -- )
:M CLOSEMENU: ( -- )
--- 13174,13183 ----
:M CLASSINIT:
:M CLASSINIT:
+ :M CLASSINIT:
:M CLASSINIT: ( check_flag -- )
:M CLASSINIT:
:M CLASSINIT:
:M CLASSINIT: ( -- )
! :M CLASSINIT: ( -- )
:M CLASSINIT: ( -- )
:M CLOSEMENU: ( -- )
Index: HelpWrd.hdb
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.hdb,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
Binary files /tmp/cvsa7jfOO and /tmp/cvsTtroxm differ
Index: HelpWrd.tv
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.tv,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** HelpWrd.tv 18 Nov 2011 11:40:15 -0000 1.14
--- HelpWrd.tv 17 Jan 2012 21:07:46 -0000 1.15
***************
*** 1,14576 ****
0 tvn| Words| tvd| 0|
! 1 tvn| CLASSROOT| tvd| 5516|
2 tvn| -methods-| tvd| 0|
! -3 tvn| CLASSINIT:| tvd| 5517|
! -3 tvn| ~:| tvd| 5518|
! -3 tvn| ADDR:| tvd| 5519|
! -3 tvn| PRINT:| tvd| 5520|
! 2 tvn| OBJECT| tvd| 5521|
3 tvn| -methods-| tvd| 0|
! -4 tvn| GET:| tvd| 5522|
[...29124 lines suppressed...]
! 2 tvn| \+| tvd| 5333|
! 2 tvn| \-| tvd| 5334|
! 2 tvn| \IN-SYSTEM-OK| tvd| 5339|
! 2 tvn| \S| tvd| 5388|
! 2 tvn| ]MACRO| tvd| 5229|
! 2 tvn| __STDCALL| tvd| 5220|
! 2 tvn| {| tvd| 5411|
! 2 tvn| {:| tvd| 5410|
! 2 tvn| |IF| tvd| 4948|
! 2 tvn| |OF| tvd| 4947|
1 tvn| Deprecated| tvd| 0|
! 2 tvn| .DIR->FILE-NAME| tvd| 5090|
! 2 tvn| >BOLD| tvd| 4159|
! 2 tvn| >NORM| tvd| 4158|
! 2 tvn| ABS>REL| tvd| 5359|
! 2 tvn| REL>ABS| tvd| 5360|
! 2 tvn| TASK-SLEEP| tvd| 2594|
! 2 tvn| _PRINT-DIR-FILES| tvd| 5088|
1 tvn| Vocabularies| tvd| 0|
2 tvn| Application space| tvd| 0|
Index: HelpWrd.ndx
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Help/hdb/HelpWrd.ndx,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
Binary files /tmp/cvszPTSPH and /tmp/cvsZOU49l differ
|
