Hi,
ist zwar nicht konkret zu dem Problem - aber dass kann ich auch grad nicht nachvollziehen - aber was anderes:
Wieso holst du dir in jedem Schleifendurchlauf ein neues Ini-
Handle?
Ich würd dass da rausziehen, etwas so:
Delphi-Quellcode:
i := FSetUp.LBoxSetUp.Count;
ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + IFN);
try
for j := 0 to i - 1 do
begin
ini.WriteString('Programme', FSetUp.LBoxSetUp.Items[j], '');
ShowMessage(IntToStr(j));
end;
finally
ini.Free;
end;
Btw würden deinem Code Delphi-Tags auch nicht schaden
Ansonsten zu deiner Anzeige ob die Datei existiert oder nicht - die ist ja irgendwo ein bisschen sinnfrei, vor allem ist es beim ersten mal in der Schleife eigentlich nie so, dass die Datei da sein kann, wenn sie vorher nicht existiert hat, da allein ein TIniFile.Create noch keine Datei erzeugt.
Also bei mir funktioniert dass so wie ich das gepostet hab einwandfrei - ein Problem sollte dir aber Gewiss sein (es sei denn, du beabsichtigst das) - es darf für jede Sektion jeden Key nur einmal geben, d.h. hast du in mehrere gleichnamige Items, überschreiben die sich in der Ini.
MfG Benedikt