Ordner, Unterordner und Dateien darstellen?

[Paul0703]

Stimmt, den Code hätte ich vielleicht mit angeben sollen

Delphi-Quellcode:

procedure TForm3.Button1Click(Sender: TObject);
begin
  DeleteFile(Form1.ShellTreeView1.Selected);  // Hier kommt der Fehler.
  Form1.ShellTreeView1.Update;
  Form3.Close;
end;