In TextFile eine Zeile ändern

**kenuvis**

Hallo,

ich habe ein TextFile dass so anfängt:

;; TT File generated by YAWE Server.
;;
IENTRYCOUNT = 1
;; Please do not remove the line above, it's for speed up purposes.
;; Removing it won't break DB loading, but it will slow it down.

und halt dann ewig weitergeht.

ich möchte jetzt die Zahl da hochzählen können und in die Datei schreiben.

Finden der Zeile und so mach ich wie folgt:

markieren

Delphi-Quellcode:

			Assignfile(F, ExtractFilePath(Application.ExeName)+'saves\accounts.tt');

  Reset(F);

  Repeat

        ReadLn(F, temp);

  until pos('IENTRYCOUNT',temp) <> 0;

  IEntrycount  := StrToInt(copy(temp,pos('=',temp)+1,length(temp)));

  closeFile(F);

(eigendlich sinnlos, dass ich das hier poste)

hoffentlich kann mir da einer helfen.

mfg kenu

In TextFile eine Zeile ändern

In TextFile eine Zeile ändern

Forumregeln