I am using AdvTreeView to view data from a db.

I am using AdvTreeView to view data from a db.
Using "root, child: TAdvTreeViewNode;", after getting Root with "Root := TV.AddNode();" root shows a ".tag" property.
I am setting it to the record's Id value. Cool so far.

When I try to use the value with this method:
procedure TfrmQTBugTracker_Main.tvBugsAfterSelectNode(Sender: TObject;
ANode: TAdvTreeViewVirtualNode);
var
id: Integer;
CNode: TAdvTreeViewVirtualNode;
begin
if ANode.Level= 0 then
begin
id := TAdvTreeViewNode(ANode).tag;
begin
dm_qtbt.GetBugHistory(id, tvbughistory);
end;
end;
end;
the Tag value is zero.

Back in Root, I see a DataInteger property.

Can someone show me how to use these properties?

Thanks...Dan'l

Comments