Moin, ....ist ungetestet, aber ich würde es eher so machen..
Delphi-Quellcode:
function ReadString(AFile: string; ABeginPos, AEndPos: Integer): string;
var LFs: TFileStream;
begin
LFs := TFileStream.Create(AFile, fmOpenRead);
try
LFs.Position := ABeginPos;
SetLength(result, (AEndPos-ABeginPos));
LFs.Read(Pointer(result)^, (AEndPos-ABeginPos));
finally
LFs.Free;
end;
end;
Edit: Sry, grad erst mitgekriegt, daß du die Zeile auch angeben möchtest...erst Zeile...dann Position