(难道真的没有高手?)请问如何在Quickreport内打印OLE生成的DWG图形; (99分)

  • 主题发起人 主题发起人 铁牛
  • 开始时间 开始时间

铁牛

Unregistered / Unconfirmed
GUEST, unregistred user!
在设计时,我用OLE在Quickreport内放上OLEContener来读出数据库的DWG图形,但是在打印预览时,quickreport上不会显示;请问该如何做?有没有什么好的方法?
 
不是不想帮你,可我不会,帮你提前!
 
你这个问题不会编程的人也会做你找一个抓图软件不就行了吗还着什么急呢。
 
哪有那么简单,是要在报表内OLE动态生成的DWG,因为报表不支持OLE对象,所以图形在预览时根本就不显示。
到底有没有那位高手知道如何做,或者有比较好的方法。
 
你 要在報表中顯示圖片﹐首先要有圖片字段﹐存儲blob類型﹐然后遙QRDBimage連接。
 
但是由于是DWG图形,如果存储到图片字段,用QRDBimage根本就读不出来
 
给你一个思路,看看,应该可以的,不过还需要仔细调整。
uses
Activex;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
OleDraw(OleContainer1.OleObjectInterface, 1, QRImage1.Canvas.Handle,
QRImage1.Canvas.ClipRect);
QuickRep1.Preview;
end;

 
谢谢 yzhshi:
图形显示没问题了,但是如何在报表中显示总页数.
 
Parpare一次后取Printer的PageCount就可以了。
QuickRep1.Prepare;
QuickRep1.Printer.PageCount
 
谢谢 yzhshi,问题解决啦.
真的很感谢.
不过,能不能再麻烦您,我还有一个瓶颈问题:
就是如何编程实现能够根据用户需求,自己定制报表并跟数据库关联.
因为考虑到不同的企业需要不同的报表,特别是工艺表的格式千变万化,如何编程实现企业报表模板定制,以便企业可以根据需要定制自己的模板.
我考虑过用EXCEL来做,但是如果只是输出一两种表,可以直接在EXCEL中做好后存成模板,以后在程序中调用输出.但是要企业定制就很难实现啦.
不知您有没有编过相关的程序,能否给我一些启示.
 
这个就是所谓的智能报表问题,其实开发度和定制难度是一对矛盾。
所以说,如果要客户来定制,你会花费很大的力气去做。SamSung 有一个报表软件Reqube,就是专门负责报表的。
这个话题还是很大的一个话题,如果从简单的方向来说,就是做一个报表的设计器和一个报表的解释器。
设计器将提供给用户进行各种格式的设计,解释器根据客户的设计将报表展现出来。
做一个完善完美的报表软件,既需要好的软件设计,同时还需要一个好的数据库作为支撑。
个中辛苦,恐怕只有真正从事过报表设计的才能知道……
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部