How about a resource dll.
Heres an example from the delphi3000.com site

Create and build an empty DLL project, that contains a resource
link reference to the .res file that contains your resources.


library ResTest;
uses
  SysUtils;

{$R MYRES.RES}

begin
end.

To use you resource only DLL, simply load the dll and the
resources
you wish to use:

Example:

{$IFDEF WIN32}
const BadDllLoad = 0;
{$ELSE}
const BadDllLoad = 32;
{$ENDIF}

procedure TForm1.Button1Click(Sender: TObject);
var
  h : THandle;
  Icon : THandle;

begin
  h := LoadLibrary('RESTEST.DLL');

  if h <= BadDllLoad then
    ShowMessage('Bad Dll Load')
  else begin
    Icon := LoadIcon(h, 'ICON_1');
    DrawIcon(Form1.Canvas.Handle, 10, 10, Icon);
    FreeLibrary(h);
  end;
end;




-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of Phil Scadden
Sent: Tuesday, July 17, 2001 2:00 PM
To: Multiple recipients of list delphi
Subject: [DUG]: Sharing a bitmap between processes


And for something completely different...

I want one process to be able to share a bitmap with another process. Since
you
cant share win handles, then somehow need to get bitmap into shared memory.
Writetomemorystream perhaps? There isnt by any chance some arcane windows
lore on sharing such an object?


----------------------------------------------------------
Phil Scadden, Institute of Geological and Nuclear Sciences
41 Bell Rd South, PO Box 30368, Lower Hutt, New Zealand
Ph +64 4 5704821, fax +64 4 5704603
---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

Reply via email to