摘要：
现在知道怎么用了吧。希望能帮住更多的人。
1.设置图片如下：
设置默认值：
if Trim(FQuery.fieldByName('cPersonCategory').AsString) = '' then
begin
CNode.Values[PersoncPersonCategory.ItemIndex] := '07';
end
else
begin
CNode.Values[PersoncPersonCategory.ItemIndex] := Trim(FQuery.fieldByName('cPersonCategory').AsString);
end;
取值：
if Trim(ANode.Texts[PersoncPersonCategory.ItemIndex]) = '' then
FLedgerExOutPzPersonSet.cPersonCategory := ''
else
FLedgerExOutPzPersonSet.cPersonCategory := ANode.Values[PersoncPersonCategory.ItemIndex];
Texts ： 显示的属性 ANode.Texts[PersoncPersonCategory.ItemIndex]
Values：隐藏的值 ANode.Values[PersoncPersonCategory.ItemIndex]。
现在知道怎么用了吧。希望能帮住更多的人。