DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: kebingoo
今日帖子: 3
在线用户: 2
导航: 论坛 -> 数据库专区 斑竹:liumazi,waterstone  
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 10:08:37
标题:
GDgrid的问题?(在线等待,欢迎光临) 浏览:3009
加入我的收藏
楼主: 各位大虾如何在GDgrid控件中选中若干条记录,并用报表浏览出来(报表已做好了,DATAVIEW的DATASET为ADOQUERY1)!该怎么做,能不能说详细点呀,我是一只小小小菜鸟!^_^
----------------------------------------------
-
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 11:28:36
1楼: 怎么没人指点以下我吗?!!!!!在DBGRID的中任选几条记录,如何让他们在报表中显示呀?这应给不是难问题吧?
----------------------------------------------
-
作者:
男 givemeliu (delphi傻瓜) ★☆☆☆☆ -
盒子活跃会员
2004/1/8 11:55:50
2楼: 帮你顶
----------------------------------------------
我们共同努力,一切问题都会解决
作者:
男 waterstone (waterstone) ★☆☆☆☆ -
盒子活跃会员
2004/1/8 12:26:22
3楼: 难者不会
会者不难
既然不难
那.....
----------------------------------------------
我来自农村广阔的田野我的每一个动作都很夸张http://waterstone.51r.com
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 12:31:46
4楼: 我很菜所以不会,这里那么多高手还不会吗,这里难道都是菜鸟吗?
----------------------------------------------
-
作者:
男 msgsnd (会飞的鱼) ★☆☆☆☆ -
普通会员
2004/1/8 12:41:05
5楼: 你的数据 是任意的吗?
----------------------------------------------
世界上有千千万万条路,总有一条路是属于我自己的;
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 13:15:12
6楼: 是呀,记录已在DGgrid中正常显示,现在是要按CTRL见后选中任意多条记录,然后通过做的报表显示出来。该怎么做呀
----------------------------------------------
-
作者:
女 liuyafang156 (天涯) ★☆☆☆☆ -
普通会员
2004/1/8 13:21:41
7楼: 关注中。
----------------------------------------------
-努力就会有收获!
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 13:26:43
8楼: 我说天涯兄弟别光关注呀,想想办法吗!
----------------------------------------------
-
作者:
女 liuyafang156 (天涯) ★☆☆☆☆ -
普通会员
2004/1/8 16:29:52
9楼: 我在csdn论坛上发表了同样的问题问题没有人回答清楚。
----------------------------------------------
-努力就会有收获!
作者:
男 ranger (ranger) ★☆☆☆☆ -
盒子活跃会员
2004/1/8 17:33:27
10楼: 笨方法:
TDBGrid中有一个selectedrows属性
建一个ClientDataSet,拷贝ADOQuery的FieldDefs,CreateDataSet,然后

  if Grid1.SelectedRows.Count>0 then
    with Grid1.DataSource.DataSet do
      for i:=0 to Grid1.SelectedRows.Count-1 do
      begin
        GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
        for j := 0 to FieldCount-1 do
          ClientDataSet.Fields[j].Value := ADOQuery.Fields[j].Value
      end;

将ClientDataSet做为DataView的DataSet
不用ClientDataSet也可以,使用一个ADOTable并Clone,那样就是一条条的删未选择的记录了
----------------------------------------------
- 还冇学会
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/8 19:23:10
11楼: ranger:不好意思我菜,所以有些不太懂,特别是“拷贝ADOQuery的FieldDefs,CreateDataSet”这一句。能不能在说详细点呀!!还有Dbgrid里好象没有selectedrows属性呀。

----------------------------------------------
-
作者:
男 ranger (ranger) ★☆☆☆☆ -
盒子活跃会员
2004/1/8 19:50:06
12楼: TDBGrid中有SelectedRows属性,你可查看帮助文件
再详细点:
var
aClient: TClientDataSet;
begin
  aClient := TClientDataSet.Create(nil);
  try
    with aClient do
    begin
      FieldDefs.Assign(ADOQuery1.FieldDefs); //拷贝字段定义
      CreateDataSet;                         //在内存中建立一个表,此时该表已经打开
  ......
  //10楼代码+打印代码
  finally
    aClient.Free;
  end;
end;


----------------------------------------------
- 还冇学会
作者:
女 liuyafang156 (天涯) ★☆☆☆☆ -
普通会员
2004/1/9 11:26:32
13楼: 运行前怎么会有以下错误呢:“undeclared identifier:'TClientDataSet';
是不是得在uses语句里面引用某个库函数啊?
----------------------------------------------
-努力就会有收获!
作者:
男 ranger (ranger) ★☆☆☆☆ -
盒子活跃会员
2004/1/9 11:38:46
14楼: uses DBClient

另:建议老弟先找本书系统地学习一下,别急着编程
----------------------------------------------
- 还冇学会
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/9 12:33:48
15楼: ranger:想问一个问题:你觉得是delphi 7.0自带的reve report 5.0好用,还是Fast report 好用,这两我都是刚接触,所以想哪个好用一点就学习那一个了,给个建议吧^_^
----------------------------------------------
-
作者:
男 ranger (ranger) ★☆☆☆☆ -
盒子活跃会员
2004/1/9 12:38:23
16楼: 建议用FastReport,对中文兼容好点
----------------------------------------------
- 还冇学会
作者:
女 liuyafang156 (天涯) ★☆☆☆☆ -
普通会员
2004/1/9 15:03:21
17楼: yong大哥。你说的那两个我还没用过。我现在只用QuickReport(delphi6.0)的。
对了你的问题得到解决了吗?
----------------------------------------------
-努力就会有收获!
作者:
男 yong (yong) ★☆☆☆☆ -
普通会员
2004/1/9 15:15:10
18楼: 天涯兄弟:我试了以下还是不行,是我的基础太烂了没办法了不过思路我是知道了,在用一段时间学习一下,我相信就能做到了。我也建议你也用用Fast Report 挺好用我这两天都在用,ranger说的很有道理,中文兼容是好一点,这个我已经体会到了。你的问题解决了吗?我相信有更简单的办法。
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行59.57031毫秒 RSS