在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20060929084043280.html procedure TForm1.FormCreate(Sender: TObject); var rect1,rect2:Trect; begin rect1.Left:=image1.Left; rect1.Top:=image1.Top; rect1.Right:=rect1.Left+image1.Width; rect1.Bottom:=rect1.Top+image1.Height; rect2.Left:=image2.Left; rect2.Top:=image2.Top; rect2.Left:=rect2.Left+image2.Width; rect2.Bottom:=rect2.Top+image2.Height; image2.Canvas.CopyRect(rect2,image1.Canvas,rect1); end; 在我电脑运行后image2就是纯白色的一片,那位大哥大姐可怜可怜我这小^^^^^^^^^ 我家太穷没什么分!!!! var 失踪的月亮 你说的那个方法能实现,刚才说错了.不好意思 图像编程你可以看看opencv ,intel的视觉库sourceforge上有下载,论坛你可以去阿须论坛 |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论