Einzelnen Beitrag anzeigen

Doomlittle

Registriert seit: 31. Mär 2004
8 Beiträge
 
#1

Listbox DeleteSelected und Ini Erasesections [gelöst]

  Alt 11. Mai 2004, 11:22
Hallo Leute

Ich habe momentan ein kleines Problem mit meinem Programm, was sich im Großen und Ganzen um den Webbrowser dreht. Mit einer Listbox werden Einträge aus einer Ini Datei angezeigt, die dem Webbrowser als Favoriten dienen.

Nun möchte ich in der Listbox mehrere Einträge löschen was natürlich dann auch in der Ini Datei geschehen soll. Das tut es nur noch nicht.

Delphi-Quellcode:
procedure TMain_Form.Favoriten_ListBoxKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key=vk_delete then
  if Favoriten_ListBox.Selected[Favoriten_ListBox.ItemIndex]
  then
  begin
    if MessageDlg( 'Willst du diese(n) Favoriten löschen?' , mtWarning,[mbYes,mbNo],0)=mrYes
    then
    begin
      try
      Ini_favoriten.EraseSection(Favoriten_ListBox.Items[Favoriten_ListBox.ItemIndex]);
      Favoriten_ListBox.DeleteSelected;
      except
      //
      end;
    end;
  end;
end;
Die Listbox ist zwar nach dieser Aktion leer, bei einem Neustart sind aber wieder fast alle selektierten Einträge da und nur einer (meist der Letzte) fehlt - die Ini wird also nicht wirklich um die ausgewählten Einträge beschnitten. Ich bin extra wegen der DeleteSelected Methode von Delphi 5 auf Delphi 7 umgestiegen und frage mich nun warum die Einträge nicht auch in der Ini gelöscht werden. Mir schwahnt zwar wieder einmal das dort eine Schleife fehlt, allerdings habe ich noch nicht herausgefunden wie man diese dort anwenden könnte.

Vielleicht habt ihr ja einen Hinweis für mich,
Danke im Vorraus
  Mit Zitat antworten Zitat