资源文件的问题，MYBMP1 IS NOT FOUND

Question

procedure TForm1.Button1Click(Sender: TObject);
var MYSTREAM:Tresourcestream;
begin
        MYSTREAM:=Tresourcestream.create(Hinstance,'MYBMP1','BITMAP');
        image1.Picture.Graphic.LoadFromStream(MYSTREAM);
        MYSTREAM.free;
end;运行后，MYBMP1 IS NOT FOUND，为什么？procedure TForm1.Button3Click(Sender: TObject);
var
 BitMap1 : TBitMap;
begin
  BitMap1 := TBitMap.Create;
  try
    BitMap1.LoadFromResourceName(HInstance,'MYBMP1');
    Canvas.Draw(12,12,BitMap1);
  finally
    BitMap1.Free;
  end;
END;
而这段却可以通过，那么上一段代码问题在哪里呢？

Answer 1

MYSTREAM:=Tresourcestream.create(Hinstance,'MYBMP1',RT_BITMAP);

Answer 2

brcc32 resource.rc 
生成 resource.res编译时加上
{$R resource.res}