Zitat von
NamenLozer:
Das funktioniert auch ohne Laufwerksbezeichner tadellos. Eben schnell unter Delphi 3 getestet:
showmessage(extractfilename('ordner\eigene dateien\datei.txt'));
Gibt "datei.txt" aus.
Nicht mit einer einzelne Datei testen, sondern die Liste in ListBox1!
Hier ist eine Lösung: Und schon getestet
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i : Integer;
begin
for i:=1 to listbox1.items.count do
listbox1.items[i-1]:=extractfilename(stringreplace(listbox1.items[i-1], '/','\', [rfreplaceall]));
end;
<>