ALso ich würde mal sagen, so müsste es heißen:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
Ini: TIniFile;
i: Integer;
begin
Ini := TIniFile.Create( ChangeFileExt( Application.ExeName, '.INI' ) );
try
for i := 1 to Ini.ReadInteger('kategorie', 'anzahl', 0) do
begin
ComboBox1.Items.Add(Ini.ReadString('kategorie', IntToStr(i), IntToStr(i))); //<--- IntToStr
end;
finally
Ini.Free; //<-- Objekt freigeben mit Resourcen-Schutzblock
end;
end;