delphi中的TreeView如果获取value值

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

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

你的那个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;