AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TIniFile und DeleteKey

Ein Thema von newuser01 · begonnen am 26. Sep 2006 · letzter Beitrag vom 27. Sep 2006
 
newuser01

Registriert seit: 30. Aug 2006
248 Beiträge
 
Delphi 7 Professional
 
#9

Re: TIniFile und DeleteKey

  Alt 26. Sep 2006, 21:43
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;
Gruß: Holger

[Hobby-Programmierer]
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:39 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz