Ich hab bis jetzt noch nicht so recht begriffen warum es besser ist die Schleife rückwärts laufen zu lassen
es hat bei mir noch nicht so richtig klick gemacht
Ich vermute mal wenn in der Rückwärtsversion "i" immer ListBox1.Count ist dann ist ja "i" somit auch immer aktuell oder ? denn wenn in der Vorwärtsversion "i" nur hochzählen würde aber ListBox1.Count nun plötzlich nicht mehr stimmt dann FEHLER oder ?
Delphi-Quellcode:
procedure TfMain.btnDeleteClick(Sender: TObject);
var
i:integer;
Ini:TIniFile;
begin
Ini := TIniFile.Create(ExtractFilePath(Application.ExeName)+'setting.ini');
for i := ListBox1.Count -1 downto 0 do
begin
if ListBox1.Selected[i] = true then
begin
Ini.DeleteKey('Properties',ListBox1.Items.Strings[i]);
ListBox1.Items.Delete(i);
end
else
begin
end;//if
end;//for
Ini.UpdateFile;
Ini.Free;