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:
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