Delphi Pages Forums

Delphi Pages Forums (
-   VCL (
-   -   How to get file size to fileread? (

oxygen 09-16-2018 03:54 PM

How to get file size to fileread?
I'm diving in this stuff about two hours but cannot find how to get the size of file to be opened by fileread:


FileHandle : Integer;
fSize: Integer;
      FileHandle := FileOpen('b:\html.txt', fmOpenRead);
      fSize := fileSize(FileHandle);
      FileRead(FileHandle, buffer , fSize );

I need to read the complete file and FileRead seems to be best suitable for me.

I would like to avoid the fileSize function because it has different type then the FileRead input argument no 3.

oxygen 09-16-2018 04:38 PM

I found solution

      FileHandle := FileOpen('b:\html\' + SubDirs[m] + '\' + FileList[i], fmOpenRead);
      fSize := FileSeek(FileHandle,0,soFromEnd);
      setLength(buffer, fSize);
      FileRead(FileHandle, buffer , fSize );

All times are GMT. The time now is 08:48 PM.

Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2019, vBulletin Solutions, Inc.