Componente Treeview

[ecfisa]

Hola agustin.

Suponiendo que 'itebis' sea TreeView1.Items[0], podrías usar el evento OnClick del TTreeView.

Como ejemplo:

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  if TreeView1.Items[0].Selected then
    with TMemo.Create(nil) do
    begin
      Parent:= Self;
      Color:= clYellow;
      Left:=1;
      Top:= 1;
      ...
      Lines.Add('Texto ...');
    end;
end;

Saludos.