5,392
社区成员
发帖
与我相关
我的任务
分享Delphi 不写一行代码快速制作漂亮的表格,打印(预览),(欢迎回帖有分)
1)用 Excel 做好表格不添数据网格的大小一定要够大(越漂亮越好不要太多颜色).
2)将 表格选中 按Ctrl+C (拷贝).
3)打开,Adobe Illustrator 10 或 CorelDRAW 10 以上(别的软件没式)
4)在 Illustrator 或 CorelDRAW 新建一个 A4 的文档
5)Ctrl+V 粘贴,这样我们的Excel 表格画完好的拷贝到Illustrator 或 CorelDRAW 6)用 Illustrator 或 CorelDRAW 导出.EMF 文件(EMF 文件是矢量的大家都知道吧)
7)打开 Delphi 托一个 QuickRep 在放上一个QRImage;
8)选择 QRImage 的 prcture 属性导入刚才 6 中导出的EMF 文件.
漂亮的表格完成了!由于EMF文件式矢量突不管你的打多大都不会 失真 ^_^
是不是一行代码都不要写.比原来用 QRShape 画表格简单还漂亮!斜线也行的.
9)将没添数据的地方放上 您需要的 打印控件就行了(如:QRLabel 等);
10)配合 QuickRepNeedData 事件 和 QuickRep1StartPage 就可以了!
2)将 表格选中 按Ctrl+C (拷贝).
3)打开,Adobe Illustrator 10 或 CorelDRAW 10 以上(别的软件没式)
4)在 Illustrator 或 CorelDRAW 新建一个 A4 的文档
5)Ctrl+V 粘贴,这样我们的Excel 表格画完好的拷贝到Illustrator 或 CorelDRAW 6)用 Illustrator 或 CorelDRAW 导出.EMF 文件(EMF 文件是矢量的大家都知道吧)
7)打开 Delphi 托一个 QuickRep 在放上一个QRImage;
8)选择 QRImage 的 prcture 属性导入刚才 6 中导出的EMF 文件.
漂亮的表格完成了!由于EMF文件式矢量突不管你的打多大都不会 失真 ^_^
是不是一行代码都不要写.比原来用 QRShape 画表格简单还漂亮!斜线也行的.
9)将没添数据的地方放上 您需要的 打印控件就行了(如:QRLabel 等);
10)配合 QuickRepNeedData 事件 和 QuickRep1StartPage 就可以了!
...全文
请发表友善的回复…
发表回复
wangguan007 2003-10-10
- 打赏
- 举报
学习一下！！
关注！！
关注！！
曲滨_銘龘鶽 2003-10-10
- 打赏
- 举报
if QuickRep1.RecordNumber <10 then
应该是
if QuickRep1.PageNumber <10 then
写错了！
应该是
if QuickRep1.PageNumber <10 then
写错了！
hawk_js 2003-10-10
- 打赏
- 举报
学习，谢谢楼住
xiaoyuer0851 2003-10-10
- 打赏
- 举报
呵呵，好的，先试试…………
xt_pan 2003-10-10
- 打赏
- 举报
学
meteorlg 2003-10-10
- 打赏
- 举报
study
readersm68 2003-10-10
- 打赏
- 举报
学习
zhp97 2003-10-10
- 打赏
- 举报
顶，好帖啊
ghao0 2003-10-10
- 打赏
- 举报
收藏
曲滨_銘龘鶽 2003-10-10
- 打赏
- 举报
谢谢捧场!很好用的,总是感觉 在 csdn 学会了很多东西(这里先报答一下)
其实这方法在其他语言如VC/C# 也行不过 VC 就要用 HDC 画上去了,不过一比
画线快的多.^_^
其实这方法在其他语言如VC/C# 也行不过 VC 就要用 HDC 画上去了,不过一比
画线快的多.^_^
tiger19760407 2003-10-10
- 打赏
- 举报
好的，谢谢！
Little2000 2003-10-10
- 打赏
- 举报
楼主的方法瞒新颖的，我也试一下先，谢谢楼主大公无私的精神！
Shiyl 2003-10-10
- 打赏
- 举报
学习！
julong88 2003-10-10
- 打赏
- 举报
好
ny_nicholas 2003-10-10
- 打赏
- 举报
回帖有分 ^_^ !
haoguozhong 2003-10-10
- 打赏
- 举报
跟你学！
WWWWA 2003-10-10
- 打赏
- 举报
试一下
byzx 2003-10-10
- 打赏
- 举报
给分，关注中
masepu 2003-10-10
- 打赏
- 举报
好.
曲滨_銘龘鶽 2003-10-10
- 打赏
- 举报
回帖有分 ^_^ !
加载更多回复（1）
