[Win32forth-cvs] win32forth/src/lib Listview.f,1.9,1.10

[Jos v.d.V. <jo...@us...>]

Update of /cvsroot/win32forth/win32forth/src/lib
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv15975/src/lib

Modified Files:
	Listview.f 
Log Message:
Jos: SetColumnWidth: is now able to change each colomn.

Index: Listview.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/Listview.f,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** Listview.f	5 Jun 2006 06:39:23 -0000	1.9
--- Listview.f	5 Jun 2006 12:08:07 -0000	1.10
***************
*** 341,345 ****
  :M InsertColumn:      ( pcol icol -- index|-1 ) LVM_INSERTCOLUMN hWnd Call SendMessage ;M
  :M SetColumn:         ( pcol icol -- f ) LVM_SETCOLUMN hWnd Call SendMessage ;M
! :M SetColumnWidth:    ( cx -- ) -1 LVM_SETCOLUMNWIDTH hWnd Call SendMessage drop ;M
  
  ( -------------------------------------------------------------------)
--- 341,345 ----
  :M InsertColumn:      ( pcol icol -- index|-1 ) LVM_INSERTCOLUMN hWnd Call SendMessage ;M
  :M SetColumn:         ( pcol icol -- f ) LVM_SETCOLUMN hWnd Call SendMessage ;M
! :M SetColumnWidth:    ( cx icol -- ) LVM_SETCOLUMNWIDTH hWnd Call SendMessage drop ;M
  
  ( -------------------------------------------------------------------)