Delphi 从文件加载资源

如何从另一个文件加载资源？
这是从项目加载资源的脚本：

function Loadhwid: string;
var
  ResourceLocation: HRSRC;
  ResourceSize: dword;
  ResourceHandle: THandle;
  ResourcePointer: pointer;
begin
  ResourceLocation := FindResource(hInstance, 'HWID', RT_RCDATA);
  ResourceSize := SizeofResource(hInstance, ResourceLocation);
  ResourceHandle := LoadResource(hInstance, ResourceLocation);
  ResourcePointer := LockResource(ResourceHandle);
  if ResourcePointer <> nil then
  begin
    SetLength(Result, ResourceSize - 1);
    CopyMemory(@Result[1], ResourcePointer, ResourceSize);
    FreeResource(ResourceHandle);
  end;
end;

函数Loadhwid:string；
变量
资源位置：HRSRC；
资源规模：德沃德；
资源手柄：坦德尔；
ResourcePointer：指针；
开始
ResourceLocation:=FindResource（hInstance，'HWID'，RT_RCDATA）；
ResourceSize:=SizeOffResource（hInstance，ResourceLocation）；
ResourceHandle:=LoadResource（hInstance，ResourceLocation）；
ResourcePointer:=锁资源（ResourceHandle）；
如果资源指针为零，则
开始
SetLength（结果，ResourceSize-1）；
CopyMemory（@Result[1]，ResourcePointer，ResourceSize）；
FreeResource（ResourceHandle）；
结束；
结束；

但我想知道如何从外部exe文件加载资源（我知道如何写入资源）。

---

我想将此脚本用于使用HWID的更新程序。

调用

LoadLibraryEx

传递

LOAD\u LIBRARY\u AS\u数据文件或LOAD\u LIBRARY\u AS\u图像\u资源

你还需要帮助吗？