Ich meinte
Delphi-Quellcode:
var
I: integer;
begin
if opendialog1.Execute then
for i:=0 to opendialog1.Files.Count -1 do
begin
listbox1.AddItem(Extractfilename(opendialog1.Files.Strings [i]),nil );
end;
end;
Dann werden die Dateinamen ohne Pfad in der ListBox angezeigt.
[edit=Daniel B]Delphi-Tags eingefügt und Code formatiert. Mfg, Daniel B[/edit]