Einzelnen Beitrag anzeigen

Tyrael Y.

Registriert seit: 28. Jul 2003
Ort: Stuttgart
1.093 Beiträge
 
Delphi 2007 Professional
 
#4

Re: eine bestimmte position in text dateien auslesen

  Alt 19. Dez 2005, 13:51
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
Levent Yildirim
Erzeugung von Icons aus Bildern:IconLev
  Mit Zitat antworten Zitat