FOpen(FileName, 2, 4, hFile);
Nein ich wollte die datei mit Zugriffsrechten öffnen.
Das war der einzige Sinn und zweck..
Scheinbar ist mir da ein Denkfehler unterlaufen.
Habe es jetzt so gelößt..
Delphi-Quellcode:
procedure FBuffin(FileName: string);
var
sBuffer: string;
f : TextFile;
begin
if not FExist(FileName) then
Exit;
Assignfile(f, FileName);
reset(f);
while not eof(f) do
begin
ReadLN(f, sBuffer);
FSeekTo(nReading, sBuffer);
inc(nReading);
end;
CloseFile(f);
end;
Danke für eure Hilfe
gruss