我在物料类别设置的时候,想把类别名称和类别编号都保存在treeview中。
但是treeview只显示类别名称,即,利用items的text属性保存类别名称
由于增加子类别的时候需要用到类别编号,所以必须把类别编号也保存下来,所以想到了利用data属性,但又不知道该怎么用望高手指教
但是treeview只显示类别名称,即,利用items的text属性保存类别名称
由于增加子类别的时候需要用到类别编号,所以必须把类别编号也保存下来,所以想到了利用data属性,但又不知道该怎么用望高手指教
解决方案 »
- 从A.exe中打开B.exe的问题
- 请教,怎样获取某一具体目录下文件的数量?
- 有谁用过华表CELL的啊?
- 得到二进制文件大小 hf := OpenFile('b.dat', os, OF_READ);
- 【※】如何用 NMFTP 或 IdFTP 取得FTP服务器上文件的 TDateTime 型日期?
- 如何改变TImage控件Canvas的ClipRect的大小
- 我该选哪个?
- 用Fastreport时,怎么样实现打印输出
- 想让true在QuickRep中显示成别的字符~~
- SQL语句中的路径"库名.表名"中,库名是怎样规定的?
- 有多少人在用IntraWeb?
- delphi如何删除动态生成的多个Label
pMaterialType = ^TMaterialType;
TMaterialType = record
FType: string;
end;添加时:
var
pType: pMaterialType;begin
....
new(pType);
pType.FType:= 'XXXX'; with TreeView1.Items.Add do
begin
Text:= '名称';
Data:= pType;
end; ...
使用时: pMatrialType(TreeView1.Items.Item[intIndex].Data).FType;记得在销毁是要释放内存:
Dispose(TreeView1.Items.Item[intIndex].Data);
1.数据结构内部尽量使用固定大小字段,如
pMaterialType = ^TMaterialType;
TMaterialType = record
FType: string[63];
end;
提高效率,减少动态内存错误。
2.既然是指针,必须注意内存分配和销毁。
3.对DATA的使用使用强制类型转化,并注意指针运算。
pMatrialType(TreeView1.Items.Item[intIndex].Data)^.FType;