In
System.IoUtils
hast du z.B.
TFile.Open(..)
, das gibt einen
TFileStream
zurück.
Und: Bist du sicher dass die die "rohen" Bytes wirklich in einen String stopfen willst? Ein String ist kein Container für Bytes, sondern Text. Wenn du wirklich die echten Bytes willst, dann nimm ein Array.
Hier jedenfalls ein Beispiel das die Bytes
als ASCII interpretiert und dann in den String steckt.
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses System.SysUtils, System.Classes, System.IoUtils;
const
filePath = '
x:\myFile.dat';
startByte = 33;
byteCount = 4;
// 33, 34, 35, 36
var
fileStream: TStream;
myBytes: TBytes;
myString:
String;
begin
fileStream := TFile.Open(filePath, TFileMode.fmOpen);
try
if fileStream.Seek(startByte, TSeekOrigin.soBeginning) < startByte
then
raise Exception.Create('
file is too small');
if fileStream.
Read(myBytes, byteCount) < byteCount
then
raise Exception.Create('
file is too small');
myString := TEncoding.ASCII.GetString(myBytes);
finally
fileStream.Destroy();
end;
end.