程 程序小鱼 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-23 #1 急急急啊。HELP!我有一个IMAGE1和IMAGE2还有一个TBitmap类型的a，我想把rect(50,50,100,100）COPY到IMAGe2的(0,0,50,50)，再把这块小图，存入A怎么做，希望有代码。谢谢。
急急急啊。HELP!我有一个IMAGE1和IMAGE2还有一个TBitmap类型的a，我想把rect(50,50,100,100）COPY到IMAGe2的(0,0,50,50)，再把这块小图，存入A怎么做，希望有代码。谢谢。
A amakusa Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-23 #3 var a:TBitmap a:=Tbitmap.Create; a.width:=50; a.height:=50; BitBlt(a.Canvas.Handle,0,0,a.Width,a.Height,Image1.Canvas.Handle,50,50,SRCCOPY); Image2.Canvas.Draw(0,0,a);
var a:TBitmap a:=Tbitmap.Create; a.width:=50; a.height:=50; BitBlt(a.Canvas.Handle,0,0,a.Width,a.Height,Image1.Canvas.Handle,50,50,SRCCOPY); Image2.Canvas.Draw(0,0,a);
