ADOquery查询结果赋给DBGrid显示，不使用datasource?

2009-10-27 10:45:04 166 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

ROS2 -Jazzy 一步一步（第一步_工作空间以及编译）文件夹作用特点是否需要手动创建/维护src存放自己写的 ROS 2 包一个 workspace 可以有多个包需要手动创建build保存编译过程中的中间文件每个包生成对应子目录自动生成，可删除install保存编译完成后的功能包每个包有独立子目录，含可执行文件自动生成，可删除log保存编译日志用于查看错误原因、调试自动生成，不需修改colcon是 ROS 2 推荐使用的构建工具自动处理功能包的依赖和编译顺序一条命令就能编译整个工作空间。阅读详情

ADOquery查询结果赋给DBGrid显示，不使用datasource控件，请问如何做？

...全文

Aruba CX交换机初始化配置 Aruba CX 交换机 6000系列 8000系列交换机配置阅读详情

dzxccsu

语言基础/算法/系统设计 16,741 成员 33,233 内容

+ 关注 + 加入社区

切换为时间正序

dzxccsu 2009-10-27

打赏
举报

[Quote=引用 10 楼 jiap1723 的回复:]
可以啊。自己重写一些DBgrid 比如：

TMyGrid = class(TDBGRID)
private
FDBSet: TDataset;
procedure SetDBSet(const Value: TDataset);
public
property DBSet:TDataset read FDBSet write SetDBSet;//建立Dataset属性可以直接赋 ADOQUERY
end;

procedure TMyGrid.SetDBSet(const Value: TDataset);
begin
FDBSet := Value;
if Self.DataSource=nil then
DataSource:=TDatasource.create(self);//如果没有相应的datasoruce自动创建self管理当实例释放datasource为空
DataSource.DataSet:=Fdbset;
end;
[/Quote]3Q，我试下。

风之谷 2009-10-27

打赏
举报

可以啊。自己重写一些DBgrid 比如：

TMyGrid = class(TDBGRID)
private
FDBSet: TDataset;
procedure SetDBSet(const Value: TDataset);
public
property DBSet:TDataset read FDBSet write SetDBSet;//建立Dataset属性可以直接赋 ADOQUERY
end;

procedure TMyGrid.SetDBSet(const Value: TDataset);
begin
FDBSet := Value;
if Self.DataSource=nil then
DataSource:=TDatasource.create(self);//如果没有相应的datasoruce自动创建self管理当实例释放datasource为空
DataSource.DataSet:=Fdbset;
end;

dzxccsu 2009-10-27

打赏
举报

[Quote=引用 7 楼 bdmh 的回复:]
不行，该用stringgrid吧
[/Quote]那可不可以把一个datasource对应一个函数返回的ADOQuery类型集呢？

dzxccsu 2009-10-27

打赏
举报

[Quote=引用 5 楼 jiap1723 的回复:]
还真不知道~ 为什么不用Datasoruce呢
[/Quote]我上次给你看的那个代码里面对数据库的查询操作我是封装在一个函数里的，返回的是ADOQuery类型集。而一个面页有很多地方要用到datasource的话感觉很麻烦，可不可以用ADOQuery类型集给dbgrid直接就赋值呢？

bdmh 2009-10-27

打赏
举报

不行，该用stringgrid吧

风之谷 2009-10-27

打赏
举报

adoquery继承自 TDATASET

风之谷 2009-10-27

打赏
举报

还真不知道~ 为什么不用Datasoruce呢

dzxccsu 2009-10-27

打赏
举报

[Quote=引用 1 楼 jiap1723 的回复:]
dbgrid.datasource.dataset:=adoquery
[/Quote]这个不对吧，adoquery是TADOQuery类型，不是TDataSoutce类型，
dbgrid.datasource.dataset:=adoquery.datasource.dataset;试过也不行。

dzxccsu 2009-10-27

打赏
举报

[Quote=引用 2 楼 jiap1723 的回复:]
你不用datasoruce啊？
[/Quote]我是说不用datasource控件

风之谷 2009-10-27

打赏
举报

你不用datasoruce啊？

风之谷 2009-10-27

打赏
举报

dbgrid.datasource.dataset:=adoquery

ADOquery查询结果赋给DBGrid显示，不使用datasource?

相关推荐