Как загрузить BMP файл из DLL?

Дата: 01.01.2007
Автор: Baa

procedure TForm1.Button1Click(Sender: TObject);
var
  AModule: THandle;
begin
  AModule := LoadLibrary('Images.dll');
  image1.Picture.BitMap.LoadFromResourceName(AModule, 'StartMine');
  FreeLibrary(AModule);
end;