Purpose |
Truncate or extend an open file to its current file pointer (read/write) position. |
Syntax |
SETEOF [#] filenum& |
Remarks |
SETEOF will truncate or extend an open file to its current file pointer (read/write) position, which may be set explicitly with the SEEK statement. Unlike 16-bit Windows and DOS BASIC, Win32 will not truncate a file if you simply write an empty string to it, so the SETEOF statement is provided to cater for this need. |
See also |
|
Example |
FUNCTION PBMAIN OPEN "Temp.dat" FOR BINARY AS #1 BASE = 1 A$ = SPACE$(50) PUT$ #1, A$ ' File is now 50 bytes SEEK #1, 15 ' Move to the 15th byte and truncate there SETEOF #1 ' File is now 14 bytes CLOSE #1 END FUNCTION |