FileSize arbeitet ungenau oder ?

[Chewie]

Zitat von Rapthor:

Und wie kann ich die Property SIZE aufrufen und den Wert in eine Variable speichern ?

So:

Delphi-Quellcode:

const
  MyFile = 'c:\test.txt';
var
  fs: TFileStream;
  size: Cardinal;
begin
  fs := TFileStream.Create(MyFile, fmOpenRead or fmShareDenyWrite);
  try
    size := fs.Size;
  finally
    fs.Free;
  end;
end;