Question

delphi怎么导入资源

比如导入一张jpg图片，然后再调用它，将这张图片画在窗体上，这张图片必须嵌入exe

Answer 1

{我不是太明白你的意思，是不是问调用资源文件的意思？

假设如果你不是调用资源文件，那你可以在设计的时候就把图片给放到一个imgList里面（这算是嵌入程序了吧？）然后你就可以在程序内部调用这些图片了（只能用bitmap类型图片）；

如果你是想调用资源文件的话（这个可以装在jpg）

你需要先建立资源文件.res(怎么制作网上很多，要用到Brcc32这个命令行)

有了.res资源文件之后，再把他制作成一个动态库.dll

这样你就可以在程序里调用这个包含资源文件的动态库了~~

测试代码（制作动态库部分没写）

我给出的是bitmap的例子，jpg也可以}

procedure TForm1.FormCreate(Sender: TObject);

begin

   t:=LoadLibrary('PicRec.dll');//装在资源文件的动态库,取得句柄

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

   if t<>0 then begin

       //Image1.Picture.Bitmap.LoadFromResourceName(t,'MyBipmap');

       Image1.Picture.Bitmap.Handle:=loadbitmap(t,'MyBipmap');  //API函数 loadbitmap

   end;

end;

//---加载jpg的部分没测试，这是我抄的~~

把jpeg单元加入到Interface的uses中。
procedure TForm1.LoadJPGClick(Sender: TObject);
var
Fjpg : TJpegImage ;
FStream : TResourceStream ;
begin
Fjpg := TJpegImage.Create ;
FStream := TResourceStream.Create(t,'资源标识符',RT_RCDATA) ;//t还是我上面的handle
FJpg.LoadfromStream(FStream) ;
Image1.Picture.Bitmap.Assign(FJpg);
end;

//祝你成功~