RT
解决方案 »
- 在不知道有哪些字段相同的情况下如何比较记录
- 用存储过程写一个自动编号生成器
- 一个简单的ctrl+enter问题
- 英文和中文排版的问题
- 请问已知一个窗口的handle,用sendmessage使这个窗口隐藏,该怎么设置参数,谢谢
- DELPHI学到什么程度才能出去混饭吃?
- delphi GetProcAddress('load.dll','函数'); 错误!
- 气死我啦!如何把网络实名干掉!!!!!
- 如何像MS SQLSERVER的Enterprise Manager那样查询数据
- 请问用Delphi做的DCOM控件在VC中能够用吗?
- 用RAVE做报表,在显示前总会出现一个 Output Options 对话框,怎么让他不出现?
- ado连接interbase的问题,我已经安装了驱动,但是还是有错误。
TTFieldInfo = record
Name :String;
end;
pTFieldInfo = ^TTFieldInfo;声明
var
tmpTableInfo :pTFieldInfo;
begin
new(tmpTableInfo);
tmpTableInfo.Name := '输入字符串';
treeview1.Items.AddChildObject('父结点', '显示内容' , tmpTableInfo);
end;//访问
showMessage(pTFieldInfo(tvTableList.Selected.Data)^.Name);