wie lese ich aus der datei "inbox.toc" die ersten 322 zeichen heraus (die datei ist deutlich länger als 322) und übertrage die zeichen 122 bis 153 auf einen string?
Welche Zeichen willst du nun? Nur die 32 genannten oder die ersten 322? Die genannten Zeichen:
Delphi-Quellcode:
var
FileContents: TFileStream;
MailData: AnsiString;
begin
FileContents := TFileStream.Create(ExtractFilePath(ParamStr(0)) + 'inbox.toc', fmOpenRead);
try
FileContents.Position := 122;
SetLength(MailData, 32);
FileContents.ReadBuffer(Pointer(MailData), 32);
ShowMessage(string(MailData));
finally
FileContents.Free;
end;