Hallo,
ich habe eine DirectoryListbox und möchte per rechtsklick den selectierten Ordner löschen. Ich habe auch schon den Dateinamen ermittelt. Es fehlt mir aber der Pfad.
Hier mal der Code:
Quelltext
1:
2:
3:
4:
| for i := 0 to vg2DirectoryListBox1.Count-1 do
if(vg2DirectoryListBox1.Selected[i]) then
tname := vg2DirectoryListBox1.Items.Strings[i];
ShowMessage(tname); |
Ich habe mir dazu auch schon eine rekursion geschrieben. Nur gebe ich im Moment einen festen String ('d:\xxxx\') mit.
Quelltext
1:
2:
3:
4:
5:
6:
| (*
if Application.MessageBox(
'Do you really want to deltete the entire tree? (no undo!)',
'Warning', MB_YESNO) = IDYES then
DoDelTree('D:\jan\'+tname);
*) |
Ich schaffe es einfach nicht, den Pfad zu ermitteln des Ordners, den ich ausgewählt habe. Er darf nicht zwingend auf c: liegen!!
Habt Ihr eine Lösung für mich!
thx
Andre
