delphi中的TreeView如果获取value值 30C

赋值:TreeView1.Items.AddChildObject(temp,'ABC',TObject(‘1’))

如何获取上面所TObject('1')中的1这个值。

2个回答

你的那个TObject('1')是个指针类型,这里面你用的又是常量,所以设置的值就成了常量的十六进制值的ASCII码值$31,
也就是这个指针值就是$31,所以你要把31这个16进制转成10进制,再转成Char就得到这个值了

具体的是这样
procedure GetNodeData;
var
str:string;
P:Pointer;
i:Integer;
begin
P := TreeView1.Items[0].Item[0].Data;
i := PCardinal(@P)^;
str := Char(i);
ShowMessage(str);
end;

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问
相关内容推荐