Update of /cvsroot/win32forth/win32forth/src/lib
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv1894/src/lib
Modified Files:
treeview.f
Log Message:
DeleteItem: method added.
Index: treeview.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/treeview.f,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** treeview.f 14 Apr 2006 19:12:44 -0000 1.4
--- treeview.f 17 May 2006 15:26:17 -0000 1.5
***************
*** 246,263 ****
:M ToggleExpandItem: ( hItem -- )
! TVE_TOGGLE TVM_EXPAND hWnd Call SendMessage drop
! ;M
:M ExpandItem: ( hItem -- )
! TVE_EXPAND TVM_EXPAND hWnd Call SendMessage drop
! ;M
:M CollapseItem: ( hItem -- )
! TVE_COLLAPSE TVM_EXPAND hWnd Call SendMessage drop
! ;M
:M SortChildren: ( hItem -- )
! false TVM_SORTCHILDREN hWnd Call SendMessage drop
! ;M
\ --------------------- Overridable methods ----------------------
--- 246,266 ----
:M ToggleExpandItem: ( hItem -- )
! TVE_TOGGLE TVM_EXPAND hWnd Call SendMessage drop ;M
:M ExpandItem: ( hItem -- )
! TVE_EXPAND TVM_EXPAND hWnd Call SendMessage drop ;M
:M CollapseItem: ( hItem -- )
! TVE_COLLAPSE TVM_EXPAND hWnd Call SendMessage drop ;M
:M SortChildren: ( hItem -- )
! false TVM_SORTCHILDREN hWnd Call SendMessage drop ;M
!
! :M DeleteItem: ( hItem -- )
! \ *G Removes an item and all its children from the tree view control.
! \ ** hItem is the handle of the item to delete. If hItem is set to TVI_ROOT,
! \ ** all items are deleted.
! 0 TVM_DELETEITEM hWnd Call SendMessage drop ;M
!
\ --------------------- Overridable methods ----------------------
***************
*** 432,434 ****
\ End of File
\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
- |