Wie lösche ich eine Datei in der Listbox ?

[matrix68]

Hallo,

wie kann ich eine Datei,die in der Listbox angezeigt wird löschen ?
habe alles mögliche getan aber ohne erfolg :cry:

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
GetFilesInDirectory('C:\','test.txt',ListBox1.Items,True);
DeleteFile ???

end;

Danke in voraus

Matrix68

[City Light]

Hallo matrix68

damit müßte es gehen...

Delphi-Quellcode:

DeleteFile('C:\' + ListBox1.Items[ListBox1.ItemIndex] + '.txt');

[matrix68]

Hi City Light,

habe es so probiert wie du es gesagt hast,
leider bekomme ich eine Fehlermeldung:

Im Project.exe ist eine Exception der Klasse EstringListError aufgetreten.
Meldung:'Listenindex überschreitet das Maximum (-1)'.Prozess wurde
angehalten

wie kann ich das Problem lösen ?

Matrix68

[Christian Seehase]

Moin Matrix,

wenn kein Eintrag ausgewählt ist hat ItemIndex den Wert -1.

[matrix68]

Problem wurde gelöst,Danke an alle.

Matrix68