Delphi Pages Forums  

Go Back   Delphi Pages Forums > Delphi Forum > VCL

Lost Password?

Thread Tools Display Modes
Old 09-16-2018, 03:54 PM
oxygen oxygen is offline
Junior Member
Join Date: May 2018
Posts: 9
Question 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.
Reply With Quote
Old 09-16-2018, 04:38 PM
oxygen oxygen is offline
Junior Member
Join Date: May 2018
Posts: 9
Exclamation solution

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

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

All times are GMT. The time now is 06:33 AM.

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