关于图片与dll的问题

别岸Beyond 2003-04-09 03:00:44
请问,如何将图片(*.bmp,*.jpg等)封装到dll中去,以及如何从dll中获得图片 并显示在form上?谢谢。
...全文
48 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
findcsdn 2003-04-09
  • 打赏
  • 举报
回复
更正 {$R aa.res} 为 {$R mytest.res}
findcsdn 2003-04-09
  • 打赏
  • 举报
回复
可以建立一个DLL,然后再在dll中包含一些资源文件(*.res);

1. 先建立一个空的mytest.txt文件,改名为mytest.res文件。
2. 用vc打开mytest.res文件,右键选择“import”,选择一个图片文件比如(aa.jpg),
在资源类型中写入 JPG (一定要全部大写),保存,注意图片的资源号:一般是101,102等。

3. 在DLL的 BEGIN 上面加入: {$R aa.res}
4. 编译生成DLL文件。
5. 调用资源文件的数据:
6. 新建一个app,在窗体上放入timage控件。
7. 声明private数据:
jpg: TJPEGImage;
hdll: THandle;

8. use jpeg;

//
procedure TForm1.FormCreate(Sender: TObject);
var
tmp: TResourceStream;
begin
jpg := TJPEGImage.Create;
hdll := loadlibrary('project2.dll');
tmp := TResourceStream.CreateFromId(hdll, 102, pchar('JPG')); // 102资源号
try
jpg.LoadFromStream(tmp);
Image1.Picture.Assign(jpg);
finally
tmp.Free;
end;
end;

ok! end.
emeng 2003-04-09
  • 打赏
  • 举报
回复
no.1

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧