当然可以 不过那个组件不好看,做好自己做一个,如果你不会做组件, 可以自己做一个Frame,这样也可以; 上面放一些TSpreedButton,在放一个actionList,添加一些根数据库相关的操作功能(都是现成的) 在Frame类里设定一个获得数据源功能函数,来获得要操作的数据源; 这样你就可以像在那用就在那用了,而且相对来说,好看一点;添加这样一个函数: procedure Tdataset_Frame.SetDataSource(const Value: TDataSource); var i:integer; begin FDataSource := Value; for i:=0 to ActionList1.ActionCount-1 do begin TDataSetAction(ActionList1.Actions[i]).DataSource := Value; end; end;
不过那个组件不好看,做好自己做一个,如果你不会做组件,
可以自己做一个Frame,这样也可以;
上面放一些TSpreedButton,在放一个actionList,添加一些根数据库相关的操作功能(都是现成的)
在Frame类里设定一个获得数据源功能函数,来获得要操作的数据源;
这样你就可以像在那用就在那用了,而且相对来说,好看一点;添加这样一个函数:
procedure Tdataset_Frame.SetDataSource(const Value: TDataSource);
var
i:integer;
begin
FDataSource := Value;
for i:=0 to ActionList1.ActionCount-1 do
begin
TDataSetAction(ActionList1.Actions[i]).DataSource := Value;
end;
end;
datasource1.dataset:=adoquerydatagrid 和 adoquery 的datasource:=datasource1
要修改的话好象要设置什么东西的,忘了