delphi treeview选择节点

来源:百度知道 编辑:UC知道 时间:2024/05/08 11:29:15
delphi 里的treeview控件能不能实现选择某个节点弹出提示信息
能不能举个例子!

在OnClick事件中,你自己看看
procedure TupdateFrm.tv1Click(Sender: TObject);
var
i,j:Integer;
begin
if tv1.Selected.Parent=tv1.Items.Item[0] then//判断选中的节点是2级节点,然后执行 .
begin
txtUpdateVersion.Text:=Copy(tv1.Selected.Text,5,255);
txtUpdateURL.Text:=tv1.Selected.getFirstChild.Text;
currentClickIndex:=tv1.Selected.Index;
j:=cbbGameName.ItemIndex+1;
i:=updateList.indexOf(j);
OneInstance:=updateList.GameInfo[i].Version.findByName(Copy(tv1.Selected.Text,5,255));
end;
end;

写到CHANGE事件里