Как грузить из DLL рисунок

← →
Skiner_Y © (2005-01-09 17:23) [0]

Как можно загрузить рисунок из dll в TImage

← →
AlexG © (2005-01-09 17:39) [1]

Создай ресурсную DLL. Копай в этом направлении, сам не занимался этим.

← →
grom (2005-01-09 18:50) [2]

var H : THandle;

procedure TForm1.Button1Click(Sender: TObject);
begin
H := LoadLibrary("MyDll.dll");
if H <> 0
then begin
Image1.Picture.Bitmap.Handle := LoadBitmap(H,"BDelphi");
FreeLibrary(H);
end
else ShowMessage("Íå óäàëîñü çàãðóçèòü èçîáðàæåíèå");
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
H := LoadLibrary("MyDll.dll");
if H <> 0
then begin
Image1.Picture.Bitmap.Handle := LoadBitmap(H,"BEarth");
FreeLibrary(H);
end
else ShowMessage("Íå óäàëîñü çàãðóçèòü èçîáðàæåíèå");
end;

Как грузить из DLL рисунок Найти похожие ветки