[Win32forth-cvs] win32forth/src/lib multiopen.f,1.2,1.3

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

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

Modified Files:
	multiopen.f 
Log Message:
Increased the file buffer

Index: multiopen.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/multiopen.f,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** multiopen.f	1 May 2005 06:27:42 -0000	1.2
--- multiopen.f	1 Oct 2005 16:57:26 -0000	1.3
***************
*** 8,11 ****
--- 8,13 ----
  \- ofn-struct  create ofn-struct 19 cells , 22 CELLS allot       \ OPENFILENAME struct
  
+ 12048 constant  /szFile  \ Was 2048
+ 
  #ifndef fdlg-filter
  
***************
*** 28,32 ****
          ofn-struct 11 cells+ !                        \ save initial dir
          ofn-struct 7 cells+ !                         \ save initial filename
!         2048  ofn-struct  8 cells+ !                  \ file length
          ofn-struct 6  cells+ !                        \ filterindex
          [ OFN_PATHMUSTEXIST   OFN_FILEMUSTEXIST OR  nostack1
--- 30,34 ----
          ofn-struct 11 cells+ !                        \ save initial dir
          ofn-struct 7 cells+ !                         \ save initial filename
!         /szFile  ofn-struct  8 cells+ !               \ file length
          ofn-struct 6  cells+ !                        \ filterindex
          [ OFN_PATHMUSTEXIST   OFN_FILEMUSTEXIST OR  nostack1
***************
*** 55,59 ****
  :Class MultiFileOpenDialog   <Super  Object
  
! 2048 bytes szFile
  int fcnt    \ number of selected files
  int filterndx
--- 57,61 ----
  :Class MultiFileOpenDialog   <Super  Object
  
! /szFile bytes szFile
  int fcnt    \ number of selected files
  int filterndx
***************
*** 65,69 ****
          ClassInit: super
          0 szDir !
!         szfile 2048 erase
          1 to filterndx
          0 to fcnt
--- 67,71 ----
          ClassInit: super
          0 szDir !
!         szfile /szFile erase
          1 to filterndx
          0 to fcnt
***************
*** 154,156 ****
  
  ;Class
! MODULE