########@@@@@TreeView1.点机相应,,它的子目录,,,就会触发相应的窗口!!!@@@@@#####

Question

如上

Answer 1

具体一点。
给个例子。
procedure TFRMain.TreeView1Click(Sender: TObject);
begin
  FormYou.Show; //你要显示的窗口。
end;

Answer 2

点机子树,,就会,,出现相应的窗口,,可能我说得不太清楚,,,一个NODE,对应一个窗口,,,

Answer 3

procedure TFRMain.TreeView1change(Sender: TObject);
begin
  if treeview1.selected.name = '????' then
  begin
    FormYou.Show; //你要显示的窗口。
  end
  else if …………………………………………
end;

Answer 4

var
  frm : TForm;
frm := TForm(GetClass('名稱')).Create(nil);
frm.show

Answer 5

procedure TMainForm.TreeView1Click(Sender: TObject);
begin
if TreeView1.Items[0]=TreeView1.Selected then
   frm.showend;不知道这样行不行..

Answer 6

procedure TMain.TreeView1change(Sender: TObject);
begin
  if treeview1.selected.text= '显示窗口一' then Form1.Show
 else if treeview1.selected.text= '显示窗口二 then Form2.Show
else ................
  
end;