[NumLock]

Сообщение от Coder2k8

Что мне надо написать, что бы прочитать файл c:/test.txt в массив byteArray:array of Byte?

а..а, ну:

Код:

var
  f: TFileStream;
  buf: array of Byte;
  l: Integer;
begin
  f:=TFileStream.Create('d:\Projects\external_mod.txt', fmOpenRead);
  try
    l:=f.Size;
    SetLength(buf, l);
    f.Read(buf[0], l);
  finally
    f.Free;
  end;
end;

f.Read(buf[0], l); внутри себя использует ReadFile.