如何在CheckBizTreeView控件里面加载数据表里面的记录信息。[请求]**

alang

NameSpace: Business.Forms
--------------------------------------------------------------------------------
TCheckTreeView = class(TTreeView)
public
  constructor create(AOwner: Business.System.TComponent); overload;
  constructor create(ParentWindow: Longword); overload;
  procedure CheckNode(ANode: TTreeNode; Checked: Boolean); //检查ANode是否被选中
  procedure ClearSelection(KeepPrimary: Boolean); override; //清掉所有的选择
  procedure DeleteAllNodeAndData;  //删除所有的节点和数据
  procedure DeleteCheckBox(ANode: TTreeNode);
  procedure DeleteNodeAndData(aNode: TTreeNode);
  procedure DeployCheckedNode;
  procedure Destroy; override;
  function HasCheckedNode: Boolean;  //是否有选中的节点
  function NodeIsChecked(ANode: TTreeNode): Boolean; //检查某个节点是否选中
  property Checked[TTreeNode]: Boolean;//检查某个节点是否选中
  property CheckedImageIndex: Longint;  //选中的图像索引
  property DisableCheckedImageIndex: Longint;  //不可用的图像索引
  property GrayCheckedImageIndex: Longint;  //灰色的图像索引
  property OnClickCheck: TClickCheckEvent;
  property OnlyCheckSelf: Boolean;
  property UnCheckedImageIndex: Longint;  //未选中的图像索引
end;

这个控件从TTreeView继承下来，你可以参考TTreeView来创建这棵树

alang

q清参考 http://bbs.justep.com/forum.php? ... highlight=ttreeview