假定你的一个dll中有bmp图片,其中图片的别名为‘img’(如何将图片放入dll中百度上有图文教程)
当想将dll中的bmp导出时,可以用如下实例代码:
procedure TForm1.FormCreate(Sender: TObject);
var
hresource: THandle;
bmpTemp: TBitmap;
strDir: String;
begin
strDir:= GetCurrentDir() + '\project2.dll';
hresource:= LoadLibrary(PAnsiChar(strDir));
bmpTemp:= TBitmap.Create;
bmpTemp.LoadFromResourceName(hresource, 'img1');
image3.Picture.Bitmap.Assign(bmpTemp);
Freelibrary(hresource);
bmpTemp.Free;
end;
上图中,我的图片dll名字为‘project2.dll’