delphi从dll中调用图片资源

假定你的一个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’

原文地址:https://www.cnblogs.com/lmzjh/p/4263986.html