当我点击TcxTreeListNode的某一个节点的时候怎么判断点击的是哪个节点???
解决方案 »
- Database Desktop数据库,没搞过,征求各位高招了--------有点急
- 请问各位大侠PSafeArray在DELPHI中如何使用
- 菜鸟问题:请问高手如何在form创建时自动连接数据库显示treeview的内容?
- SQL查询的问题??
- 我用的是C/S两层结构的,怎方便的改成三层结构!!
- 有关TForm.Free得问题
- BDE中的 Database1.StartTransaction;和database1.Rollback功能在 ADO 中能实现吗?
- 关于物流管理的!取消审核一般怎么做?求思路!谈谈可以吗?
- 哪里有Indy的教程(除了自带的help外)
- 下午餐要交程序,怎么读取当前目录中的db数据库文件!急急
- 按1比1比例扫描的图片,如何将像索转为长度单位?
- listview为什么不显示列头(列标题)?
GroupID:string;//这个作为保存到INI文件里的字名,输入的组名就可以有相同的
GroupName:string; GroupFrmHandle :TfrmGroupMsg;//用户组区分不同窗体,
ShowGroupFrm :boolean;
GroupMsgList :TMyList; //保存发送过来群的聊天信息
end;
PGroupNode=^TGroupNode;
//这个是结构,你也可以定义成你想要的 PGroup := MyAllocMem(sizeof(TGroupNode)); PGroup^.GroupName:=GetSignBeforeStr('@', GroupName, false); //组名
PGroup^.GroupID :=GetSignBeforeStr('@', GroupName); //组编号
PGroup^.ShowGroupFrm:=false;
PGroup^.GroupMsgList := TMyList.Create; NodeGroup:=TVGroup.Items.AddChild(NodeMain, PGroup^.GroupName); NodeGroup.Data:=PGroup;//这个是要树形结构里添加节点时,给节点添加指针var
SelNode:TTreeNode;
PGroup:PGroupNode;
begin
SelNode := TVGroup.Selected;
if SelNode<>nil then
begin
EnablePopMenu(false);
case SelNode.Level of
0:
begin
PopAddGroup.Enabled:=true;
end;
1:
begin
PopAddGroup.Enabled:=true;
PopSendGroupMsg.Enabled:=true; PGroup := SelNode.Data;//在选择树形控件的时候,就可以这样得到选择的节点,也就可以知道你选择是哪个节点了
////让笑了,如果有不同意见就指正谢谢