//建立DLL资源文件
//先建个RC文件,格式为:
//DLL DLLFILE xxx.dll
//然后编译成RES文件,在工程里加入该资源
//定义解压资源文件函数,适合任何资源
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType)); Res.SavetoFile(ResNewName);
Res.Free;
end;
//在需要使用资源时使用就可以将资源放出来了:
var
ResPath:String;//资源释放时的路径
ExtractRes('DLLFILE','DLL',ResPath+'xxx.dll');