为什么我用TCanvas的CopyRect时发生异常 我在用CopyRect时总是将不属于源画布的内容(比如说,桌面)也拷贝进来了。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 是不是你copy的源画布的区域像素不对?//图像镜像for I:=1 to Image1.Client dobegin Image2.Canvas.CopyRect(Rect(Image1.ClientWidth-I-1),0,Image1.ClientWidth-I,Image1.ClientHeight),Image1.Canvas,Rect(I,0,I+1,Image1.ClientHeight));end; 我的代码是:AImage.Canvas.CopyRect(AImage.ClientRect,self.Canvas,Rect(0,0,ClientWidth,ClientHeight)); AImage.Canvas.CopyRect(AImage.ClientRect,self.Canvas,self.ClientRect);这样写试试 你的self没全部显示在可视区域,CopyRect只是选择了self的rect区域范围,考的是这个范围桌面显示的图象 规求关于统计单词的问题,散高分在线等,高手一定要帮忙 小问题 消息及时通 有关硬件控制的问题 急急 求救:按任意键均报错,为什么啊? 怎样复制文件,并替换原文件? 通过Image.Picture.Bitmap.Assign(MyJpeg)播放图象,怎样才能不出现闪烁? 一个关于报表打印的问题 小问题一个,搜索一直报服务器忙,只好提问!散分 急!我在做毕业设计,用delphi做前台,请问用什么做后台好些呢。狂散分!!!!!!!!1 一个学习DELPHI的问题 有indy方面的中文资料吗?在线等待
for I:=1 to Image1.Client do
begin
Image2.Canvas.CopyRect(Rect(Image1.ClientWidth-I-1),0,Image1.ClientWidth-I,Image1.ClientHeight),Image1.Canvas,Rect(I,0,I+1,Image1.ClientHeight));
end;
AImage.Canvas.CopyRect(AImage.ClientRect,self.Canvas,Rect(0,0,ClientWidth,ClientHeight));
这样写试试