Listview einträge laden funzt nicht ganz!!

[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 
...