ok, danke schon mal , das ist sehr gut!
aber ich habe noch folgendes problem!
Code:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
const
// falls Du einen Separator zwischen die Nodetext einfügen willst
Separator:String='\\';
var
Checknode: TTreeNode;
x: Byte;
nodetext: string;
begin
try
//--Zähler
x:=0;
//----Irgendein gewählter Treenode
Checknode:=TreeView1.Selected;
nodetext:=Checknode.Text;
while Checknode.Parent<>nil do begin
Inc(x);
Checknode:=Checknode.Parent;
nodetext:=Checknode.Text+Separator+nodetext;
end;
Memo1.lines.loadfromfile(extractfilepath(paramstr(0))+'verzeichnis\'+nodetext);
except end;
end;
so, ich lese praktisch die verzeichnisstruktur ins treeview ein...dann möchte ich so die dateien öffnen...jetzt sagt er mir aber bei dem ersten unterknoten, dass die datei nicht geöffnet werde kann. klar, denn das ist ja auch keine datei...aber ich kann ich jetzt noch prüfen ob die angeklickte datei ein parent ist? denn es sollen nur die richtigen endtreevieweinträge geladen werden