如题
解决方案 »
- 让程序最小化时看不到程序,然后用快捷方式调出来这个要怎么做呢?
- 怎么将4个DBChart 打印在同一个页面(A4纸)上呢?
- DELPHI编程的程序,应该用什么软件做安装最好?
- dbgrid当数据集中无记录时, 为什么多一个空行?怎样解决?
- 关于串口奇偶校验问题(急!)
- QuickReport.ColumnTopPosition 这一属性是什么意思,不要告诉我看帮助,帮助太烂:)
- 怎样捕捉道OICQ发消息的窗体?向里写消息,然后发送出去?
- 大侠救我啊!!!! 为什么我一执行调用DLL的程序就出现非法操作!!!
- 送分!如何取一个字符串中的几个字符?
- 关于死机问题,急需解决
- 有谁能把下面的量表用Delphi 5.0做出来,我给他300分
- 如何创建一个无连接的记录集或可以动态增加字段?????
procedure TForm1.TreeView1Changing(Sender: TObject; Node: TTreeNode;
var AllowChange: Boolean);
beginend;
Node就是你当前选中的节点
treeview的onmousedown事件里写
if Button<>mbRight then exit;
if TreeView1.GetNodeAt(X,Y)<>NIL then
begin
TreeView1.Selected := TreeView1.GetNodeAt(X,Y);
end;TreeView1.Selected就可以得到点中item的Node