Vielleicht geht es so: (Bin mir aber net sicher und kanns grad net austesten)
Also du markierst einen Listbox-Eintrag und klickst dann auf nen Button:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
test : String;
begin
If ( ListBox1.ItemIndex > -1 ) then
begin
test := ListBox1.Items.Objects[ ListBox1.ItemIndex ];
DeleteFile(test);
end;
end;
Weiß aber net obs geht....
