"function AddChildObject(Node: TTreeNode; const S: string; Ptr: Pointer): TTreeNode; "中第三个参数是什么意思?
例:TreeView1.Items.AddChildObject(TreeView1.Selected,'New Item',MyBitMap);
例:TreeView1.Items.AddChildObject(TreeView1.Selected,'New Item',MyBitMap);
解决方案 »
- ActiveFormX问题了。
- 求ExpressClassDeveloper Suite
- 翻译代码!
- fastreport中怎么把小数位后面的0显示出来,比如保留两位小数显示“100.10”
- 请问,如何获取一个数据表中所有字段的名称
- 请问如何实现在菜单中选择已经打开的子窗体(在mdi的中)
- 高手们,请帮个忙吧!!!(关于dll的问题)
- 请问现在的数据库开发是不是都用ADO,我是否可以不学BDE/IDAPI,InterBase等等?当我看李维的三本书时候是否可以跳过这些?请高手指点方向
- TsGrid 用回车键,按列输入数据。
- 在delphi集成環境中,如何配置默認的工作路徑 . 比如開啟文檔,直接我自定義的目錄下..
- 多个客户端同时对一个SERVERSOCKET进行操作会不会出错?
- 关于中国大陆开发网络游戏的前景
var
vTreeNode: TTreeNode;
i:inteegr;
for I := 0 to Pred(mMenuItem.Count) do
if mMenuItem[I].Visible then begin
vTreeNode := mTreeView.Items.AddChildObject(mTreeNode,
StripHotkey(mMenuItem[I].Caption), mMenuItem[I]);
var
Tmpnode :TTreeNode ;
begin
Tmpnode := TreeView1.Items.AddChildObject(TreeView1.Selected,'New Item',MyBitMap);
end
var
Tmpnode :TTreeNode ;
begin
Tmpnode := TreeView1.Items.AddChild(TreeView1.Selected,'New Item');
Tmpnode.data := MyBitMap;end