如何调用资源文件中的jpeg、avi文件(200分)

  • 主题发起人 主题发起人 whitelion
  • 开始时间 开始时间
W

whitelion

Unregistered / Unconfirmed
GUEST, unregistred user!
我在程序中放了一个Image控件及Animate控件,并且把jpg、avi文件放在资源文件中(res),如何将这些文件调出来为控件赋值呢
 
使用TResourceStream进行处理。
 
TResourceStream怎么用?
 
试试!<br>var <br>&nbsp; Myjpg: TBitmap; <br><br>implementation <br><br>{$R *.DFM} <br>{$R newres.res} &nbsp;<br><br>procedure TForm1.FormCreate(Sender: TObject); <br>begin <br>&nbsp; Myjpeg:= Timage.Create; <br>&nbsp; Myjpeg.LoadFromResourceName(HInstance,'MY_JPEG_RES'); <br>end;
 
问题:如何在资源文件中使用jpg?——50分 ( 积分:50, 回复:5, 阅读:98 )<br>分类:图形图象 ( 版主:卷起千堆雪tyn, menxin ) &nbsp;<br>来自:Ares, 时间:2000-10-4 14:09:00, ID:356462 [显示:小字体 | 大字体] &nbsp;<br>1.如何将jpg、gif格式的图片放入资源文件中?<br>2.如果能的话,如何调用它们?<br>&nbsp;<br>&nbsp;<br>来自:arm, 时间:2000-10-4 15:40:00, ID:356512 <br>编辑JPG.RC文件<br>jpg1 jpeg 1.jpg<br>jpg2 jpeg 2.jpg<br>用BRCC32 JPG.RC<br>在程序中用<br>&nbsp;{$r jpg.res}<br>var<br>JPg:Tresourcestream;<br>begin<br>&nbsp;jpg:=Tresourcestream.create(hinstance,'jpg1','jpeg');<br>&nbsp;image1.picture.assign(Jpg);<br>&nbsp;JPg.free;<br>end; <br><br><br>&nbsp;<br>&nbsp;<br>来自:wangxd, 时间:2000-10-4 15:43:00, ID:356515 <br>agree arm<br>&nbsp;<br>&nbsp;<br>来自:Ares, 时间:2000-10-15 21:52:00, ID:366793 <br>就这样吧,谢谢arm及wangxd了<br>&nbsp;<br>&nbsp;<br>来自:yy, 时间:2001-10-8 18:27:00, ID:660697 <br>to arm<br>不好意思,我编译的.rc文件时老是说不能打开.jpg文件。<br>你是怎么编译的?<br>我是先用记事本写好,再改成.rc后缀,然后到DOS下进入rcc32命令所在目录,<br>执行delphi的rcc32命令。不能生成.res文件。帮我一把,谢谢。<br>&nbsp;<br>&nbsp;<br>来自:arm, 时间:2001-10-8 18:53:00, ID:660727 <br>copy &nbsp;*.rc *.jpg and brcc32.exe to &nbsp;one dictory<br>&nbsp;<br>&nbsp;<br>
 
TAnimate有属性阿,你设置一下就可以了<br>ResName 资源文件名<br>ResHandle<br>ResID<br>
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
824
DelphiTeacher的专栏
D
D
回复
0
查看
930
DelphiTeacher的专栏
D
D
回复
0
查看
871
DelphiTeacher的专栏
D
D
回复
0
查看
945
DelphiTeacher的专栏
D
后退
顶部