frage zu treeview

[Zero1]

Delphi-Quellcode:

procedure TForm1.InfolistClick(Sender: TObject);
begin
if infolist.Selected.Text='test'
 then memo1.text('test blablabla');
end;

hum weis einer maybe wie ich den text bekomme? wenn ich zb auf das item

test clicke in treeview sollte in der memo1 ('test blablabla'); geschrieben sein? weis einer wo das prob liegt?

danke schon im vorraus!

zero1