在工程中如何引用自创的资源文件(100分)

精

精诚

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-19

• #1

我想把一幅位图文件，通过以资源文件的形式显示在image中：
{$R bitmap.res}

procedure TfrMain.btnLoadPicClick(Sender: TObject);
begin
Image1.Picture.Bitmap.LoadFromResourceName(hInstance
'bitmap.bmp');
end;
其中bitmap.res已在工程文件中
请问哪里错了呢？

 

白

白衣书生

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-19

• #2

{$R bitmap.res}

B : TBitmap;
with Image.Canvas do begin
B := TBitMap.Create;
try
B.Handle := LoadBitmap( HInstance, StrPCopy(P,UpperCase(ImageName)) );
Draw( X,Y,B );
finally
B.Free;
end;
end;

 

精

精诚

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-19

• #3

在您的程序中有用到bitmap.res吗？
我的程序错在哪呢？

 

Z

zLight

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-19

• #4

《Delphi 5 开发人员指南》 好象在第四章有这个主题，以前看过，记不住了，你自己找找看……