Hi,
ich geb jetzt auf, an so einer kleinigkeit hängen zu bleiben ist mir jetzt sogar peinlich.
Also nicht beschimpfen bitte.
Code:
procedure TForm1.LoeschenClick(Sender: TObject);
//Markierte Datei Löschen
begin
if ListBox.SelCount = 1 then
begin //Pfad zusammensetzen aus:
DeleteFile(CBPfad.Text + '\' + //ComboBox mit dem Laufwerksbuchstaben,
TreeView.Selected.Text + '\' +//TreView mit dem Ordner,
ListBox.Items.Text + //ListBox mit dem Dateinamen,
CBEndung.Text); //ComboBox mit der Endung
end;
end;
In der CBPfad steht: C:
Im TreeView steht: Windows\Desktop
In der ListBox steht: ndig
In CBEndung steht: .jpg
Es handelt sichs also dabei um die Datei ndig.jpg die auf dem Dektop liegt.
Ich möchte sie Löschen. Es eght aber nicht. Jedenfalls nicht auf Button klick.
Wenn ich es mir in eine ShowMessage anzeigen lasse, dann kommt folgendes raus:
Zitat:
C:\Windows\Desktopndig.jpg
Kann natürlich nicht gehen weil ja ein \ fehlt. Aber warum ver***** fehlts, ich versteh das nicht. Ich habe sogar im TreeView Windows\Dektop\ geschrieben und das + '\' + dahinter(Im Source) weggelassen, aber das gleiche ergebnis. Ich kapier das nicht.