W windea Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-15 #3 image.picture.loadformfile()
张 张无忌 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-15 #4 image.picture可以利用其中的bitmap来作图
孔 孔明.net Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-15 #5 要复制一个位图,可以用TBitmap.Assign()方 法: Bitmap1.Assign(Bitmap2); 也可以从一个TBitmap的实例中复制位图的一部 分给另一个,还可以使用CopyRect()方法复制给 窗体的画布。 var R1:Trect; begin with R1 do begin Top:=0; Left:=0; Right:=BitMap2.Height div 2; Bottom:=BitMap2.Height div 2; end; Bitmap1.Canvas.CopyRect(ClientRect,BitMa p2.Canvas,R1); end; 上面的代码中,先给TRect记录中的每个字段赋 值,然后调用TCanvas .CopyRect()复制位图的 一部分,TRect是这样定义的: TRect=record Case Integer of 0Left,Top,Right,Bottom:Integer); 1TopLeft,BottomRight:TPoint); end;
要复制一个位图,可以用TBitmap.Assign()方 法: Bitmap1.Assign(Bitmap2); 也可以从一个TBitmap的实例中复制位图的一部 分给另一个,还可以使用CopyRect()方法复制给 窗体的画布。 var R1:Trect; begin with R1 do begin Top:=0; Left:=0; Right:=BitMap2.Height div 2; Bottom:=BitMap2.Height div 2; end; Bitmap1.Canvas.CopyRect(ClientRect,BitMa p2.Canvas,R1); end; 上面的代码中,先给TRect记录中的每个字段赋 值,然后调用TCanvas .CopyRect()复制位图的 一部分,TRect是这样定义的: TRect=record Case Integer of 0Left,Top,Right,Bottom:Integer); 1TopLeft,BottomRight:TPoint); end;
H huazai Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-15 #6 例如: image.picture.loadformfile(openpicturedialog1.filename); image1.picture.bitmap.assign(bitmap2);