各位,谁用过dxDBTreeView?(20分)

  • 主题发起人 主题发起人 caochen
  • 开始时间 开始时间
C

caochen

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在增加节点的时候,不想让dxDBTreeView添加记录到所连接的数据表,我没有用过,
不知道怎么做,请教各位!
 
看一看所带的Demo
 
如果不用那个,用treeview自己写:(参考了曹晓钢的代码:))
function TDbM.DbShowTreeView(var ATreeView: TTreeView): boolean;
var
Node,ParNode:TTreeNode;
DtPoint:^STring;
begin
with ADOQueryTreeViewList do
begin
connection:=ADOConnwage;
if Active=true then Active:=false;
SQL.Clear;
SQL.Add('select 部门名称,部门编号,上级部门编号,上级部门名称 from 公司信息表');
try
open;
first;
while not eof do
begin
ParNode:=DbFindPrtBybh(ATreeView,fields.fieldbyname('上级部门编号').AsString);
new(DtPoint);
DtPoint^:=fields.fieldbyname('部门编号').AsString;
Node:=ATreeView.Items.AddChildObject(ParNode,fields.fieldbyname('部门名称').AsString,DtPoint);
Next;
end;
result:=true;
except
result:=false;
end;
end;
end;

function TDbM.DbFindPrtBybh(var ATvw: TTreeView; Da: string):TTreeNode;
var
I:integer;
begin
result:=nil;
for I:=0 to ATvw.Items.Count-1 do
if string(ATvw.Items.Data^)=Da then
begin
result:=ATvw.Items;
exit;
end;
end;

 
存不存数据跟DataSet有关和TreeView没什么关系
 
没有,dxDBTreeView在增加节点时它将向数据表增加记录!
 
后退
顶部