起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 371|回复: 10

【搞定】DOCVIEW导出到EXCEL问题**

[复制链接]
发表于 2007-4-25 08:40:04 | 显示全部楼层 |阅读模式
现在做的功能能够将DOCVIEW信息导出到EXCEL中,但是导出的效果却不大对头.请指教下.
回复

使用道具 举报

 楼主| 发表于 2007-4-25 08:42:24 | 显示全部楼层
查询结果如下图

0057.jpg

83.1 KB, 下载次数: 139

回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-4-25 08:43:45 | 显示全部楼层
导出到EXCEL后效果如下图,显示的只是第一行记录和合计行.
要说明的是,销售公司的记录和合计行用的是不同的数据集区域.

0058.jpg

26.5 KB, 下载次数: 140

回复 支持 反对

使用道具 举报

发表于 2007-4-25 08:45:39 | 显示全部楼层
楼主,用的是那种方式导出的?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-4-25 08:47:55 | 显示全部楼层
数据集区域定义

0059.jpg

59.21 KB, 下载次数: 136

回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-4-25 08:48:53 | 显示全部楼层
用的是按钮,
//************** Version 1.00  Begin ****************//
procedure TYSZKZLFXB.ToolButton5Click(Sender: TObject);
begin
  if dsbMaster.DataSet.IsEmpty then
    exit;
  if SaveDialog.Execute then
  begin
    if sysutils.FileExists(SaveDialog.FileName) then
    begin
      if not jsDialogs.OkCancelBox('已有该文件存在,是否替换?', '提示信息',1) then
      begin
        exit;
      end
    end;
  sheetdoclib.TSheetDocLib.CopySheetToExcel(DocView2,SaveDialog.FileName.ToString);
  jsdialogs.showmsg('本报表已成功导出!保存至'+SaveDialog.FileName.ToString+'。','提示信息');
  end;
end;
//************** Version 1.00  End   ****************//
回复 支持 反对

使用道具 举报

发表于 2007-4-25 09:38:16 | 显示全部楼层
数据集区域是怎么定义的
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-4-25 09:59:42 | 显示全部楼层
说不清,,发个包给你看下.只要看表格文档就可以了.

1.rar

1.07 MB, 下载次数: 33

回复 支持 反对

使用道具 举报

发表于 2007-4-25 10:44:05 | 显示全部楼层
楼主,从你的文档定义上看不出问题。
我按照你的做法作了一个例子,也是正常的。
你对比一下,看能不能找出什么差别。

demo.rar

1.22 MB, 下载次数: 52

回复 支持 反对

使用道具 举报

发表于 2007-4-25 10:50:29 | 显示全部楼层
应该是和数据集属性的打印-范围属性的定义有关系

改成“全部记录”看看
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-1-6 20:43 , Processed in 0.045975 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表