怎样在delphi7的rave中打印jpeg文件?(100分)

  • 主题发起人 主题发起人 ljcppunix
  • 开始时间 开始时间
L

ljcppunix

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样在delphi7的rave中打印jpeg文件?
 
如果你的文件名称和路径固定,最简单了。你设计rave报表的时候直接指定。如果是变化的,可能你需要传递文件名称和路径到rave。
 
给你点代码参考。刚测试通过的。
uses RVClass,RVProj,RVCsStd;
{$R *.dfm}
procedure TForm1.Button1Click(Sender:TObject);
var
MyPage:TRavePage;
Myiamge:travebitmap;
begin
RvProject1.Open;
with RvProject1.ProjMando
begin
MyPage:=FindRaveComponent('Report1.Page1',nil)as TRavePage;
//查找PAGE
Myiamge:=FindRaveComponent('Bitmap1',MyPage)as travebitmap;
Myiamge.FileLink:='c:/2.bmp';
end;
RvProject1.Execute;
RvProject1.Close;
end;
 
谢谢,zywcd朋友给的是rave中打印bmp文件的,但rave中没有打印jpeg的控件。
 
对不起。
这个资料给你参考。
根据网上的知识和RaveDevGuide.pdf,应该是先从Nevrona的网站(
http://www.nevrona.com/rave/addons.shtml ) 上下载对应版本的JPEG Image
Component ver 1.0。
安装JPEG Image Component ver 1.0的方法如下:
1: 把下载的文件nd_jpeg511.zip解压到RAVE5中。确保ND_JPEG成为Rave5的子目录。
2: 拷贝文件NDCSJPEG.PAS到目录Rave5的D7子目录中。
3: 启动Rave报表设计器,通过菜单路径Edit|Preferences打开preferences对话框,选择
Packages页,把C:/RAVE5/ND_JPEG.BPL包加到installed package中,然后按OK。
4:在Rave报表设计器的部件面板Standard页,就会有对应的JPG部件。把JPG部件插入到报表
中,就能够在报表中显示JPEG图片了!

通过以上步骤,仅仅是在RAVE的报表设计器中增加了显示和打印JPEG图片的功能,
在我们的应用程序中还需要完成以下步骤!
1: 在应用中的uses短语部分增加对NDCsJPEG的引用;
2: 在TRvProject部件的OnCreate事件中对NDCsJPEG部件进行注册。
procedure TReportForm.RvProjectCreate(Sender: TObject);
begin
NDCsJPEG.RaveRegister;
end;

至此,我们就能在RAVE中顺利的使用JPEG图片了!
对于GIF 应该是能够采用同样的方式来实现吧!
 
zywcd的朋友,这个方法我试过了,但安装时报错:"无法定位程序输入点 @Rvdefine@initialization$qqrv 于动态链接库 RvCore50.bpl"
说是要更新Rave 5.0 BE才行,但网上根本没有,如果你有的话给我发一份:ljcppunix@163.com
 
zywcd的朋友告诉你好消息,我从网上找到了Rave Reports BEX7,正在下,到时成功后再说
 
后退
顶部