Zitat von
APP:
Hallo Wadim,
Code:
with TIniFile.Create((ExtractFilePath(ParamStr(0))+'Einstellungen.ini')) do
[color=red][b]BEGIN[/b][/color] [color=darkblue]// hast Du vergessen :-)[/color]
a := readinteger('index','count',0); //definiere ich schon beim speichern damit er weiß ...
label1.Caption := inttostr (a);
b := 1;
while b <= a do begin
...
hmmm - er startet zwar aber kratzt beim laden ab
aber du hast recht - hab dort wirklich ein begin vergessen