比如资源是StringTable
begin
0 "AAAA"
1 "BBBB"
2 "CCCC"
3 "DDDD"
end

解决方案 »

  1.   

    LoadString(
      hInstance: HINST;   {EXE 或 DLL 的句柄}
      uID: UINT;          {资源 ID}
      lpBuffer: PChar;    {缓冲区}
      nBufferMax: Integer {缓冲区大小}
    ): Integer;           {返回字串实际长度}procedure TForm1.Button1Click(Sender: TObject);
    var
      sp: array[0..254] of Char;
    begin
      LoadString(DLL的Instance, 0, sp, SizeOf(sp));
      ShowMessage(sp); {AAAA}  LoadString(DLL的Instance, 1, sp, SizeOf(sp));
      ShowMessage(sp); {BBBB}
    end;