如何把一个用ADOquery查询的结果放入DBGrid中，急

cnepine 2004-10-15 11:12:03

如题

...全文

191 7 打赏收藏转发到动态举报

写回复

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

billfranck 2004-10-17

打赏
举报

回复

设定DBGrid的数据源
就可以显示数据
如上楼所示

krakan 2004-10-17

打赏
举报

回复

DBGrid->DataSource=DataSource1;
DataSource1->DataSet=ADOQuery1

milkwayhong 2004-10-15

打赏
举报

回复

先看dgyanyong(幸运飞龙) 的帖子
再看sunliwen780502(孙立文) 的帖子
ok了

特招 2004-10-15

打赏
举报

回复

界面上加一个ADOConnection1/一个ADOQuery1/一个DataSource1/一个DBGrid1
DBGrid1的DataSource属性选DataSource1,
DataSource1的DataSet属性选ADOQuery1,
ADOQuery1的Connection属性选ADOConnection1
这样就可以了

CB1013 2004-10-15

打赏
举报

回复

查询的结果用DataSource1跟DBGird绑定就OK

aiirii 2004-10-15

打赏
举报

回复

加個 DataSource1 聯接兩邊控件就可

sunliwen780502 2004-10-15

打赏
举报

回复

不明白,楼主是什么意思.查询时结果不就显示在DBGrid中了.DBGrid是用来显示结果的.
可以这样:
设置好ADOQuery1组件的ConnectionString属性.SQL属性:select * from TableName
设置DataSource1的DataSet属性为ADOQuery1,设置DBGrid1的DataSource属性为DataSource1
然后执行查询就可以了，结果会自动的显示在DBGrid中.

Delphi7.0读入数据到DBGrid并向Word中插入表格，其实就是Delphi向Word中插入表格，测试数据由Delphi从SQLSERVER中读取，然后放入DBGrid中，再将DBGrid网格中的数据通过Word转换成表格。　　begin 　　 if TStringGrid(DBGrid1).RowCount>0 then 　　 begin 　　 //创建一个word对象　　 wordApp:=CreateOleObject('Word.Application'); 　　 wordApp.Visible:=true; 　　 //创建一个word文档　　 wordDoc:=wordApp.Documents.Add(); 　　 wordDoc.Select; 　　 wrdSelection:=wordApp.selection; 　　 //创建一个表格　　 wordDoc.Tables.Add(wrdSelection.Range,ADOQuery1.RecordCount 1,DBGrid1.FieldCount,2,0); 　　 for i:=1 to DBGrid1.FieldCount do //设置首行的字体为粗体　　 begin 　　 wordDoc.Tables.Item(1).Cell(1,i).Range.Bold:=true; 　　 wordDoc.Tables.Item(1).Cell(1,i).Range.InsertAfter(DBGrid1.Columns[i-1].Field.FieldName); 　　 end; 　　 DBGrid1.DataSource.DataSet.First; //当前行为首行　　 for y:=2 to ADOQuery1.RecordCount 1 do //向表中添加数据　　 begin 　　 for i:=1 to DBGrid1.FieldCount do 　　 wordDoc.Tables.Item(1).Cell(y,i).Range.InsertAfter(DbGrid1.Fields[i-1].NewValue); 　　 DBGrid1.DataSource.DataSet.Next; //下一行　　 end; 　　 end 　　 else 　　 showmessage('TDBGrid表中无数据，不能向Word中插入表格。') 　　end;

在Delphi中连接数据库. 有很多函数的提示还有图片参考

Want to make the best data editing grid ever? Below are instructions for building a user interface for editing lookup fields Inside a DBGrid. Specifically, we'll be looking at how to place a DBLookup...

在 Delphi 语言的数据库编程中，DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实，我们完全可以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程，我们可以改变 DBGrid 的表头、网格、网格线的前景色和背景色，以及相关的字体的大小和风格。
以下的示例程序演示了对 DBGrid 各属性的设置，使 Delphi 显示的表格就像网页中的表格一样漂亮美观。
示例程序的运行：

//mxb列1添加下拉框项；mxb.Columns[1].PickList.；whilenotdataset.eofdobeg；mxb.Columns[1].PickList.；dataset.next;；end;；mxb.Columns[1].expanded=；//mxb列的按钮类型；mxb.Columns[1].ButtonSty；mxb.Column //mxb列

数据库及相关技术

1,178

社区成员

18,939

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章