delphi 编程 如何用鼠标在一个image控件中画矩形并选取,让选取的部分显示在另一个image控件中
1个回答
展开全部
提供一下思路：
1、鼠标画矩形
鼠标在 image 上画矩形（鼠标选取画面部分的过程），需要编写 image 的 OnMouseDown 、 OnMouseMove 以及 OnMouseUp 事件。
当鼠标按下，并开始移动后，获取鼠标的位置，不断的用 rectangle 画矩形，这个矩形要画两次，第1次是画，第2次是消除（设置 Pen.mode:=pmnot; //笔的模式为取反）。
2、复制选中部分图像到 image 中。
当鼠标停止后，使用 CopyRect 函数将指定区域的图像复制到目标 image 的 canvas 中。
1、鼠标画矩形
鼠标在 image 上画矩形（鼠标选取画面部分的过程），需要编写 image 的 OnMouseDown 、 OnMouseMove 以及 OnMouseUp 事件。
当鼠标按下，并开始移动后，获取鼠标的位置，不断的用 rectangle 画矩形，这个矩形要画两次，第1次是画，第2次是消除（设置 Pen.mode:=pmnot; //笔的模式为取反）。
2、复制选中部分图像到 image 中。
当鼠标停止后，使用 CopyRect 函数将指定区域的图像复制到目标 image 的 canvas 中。
更多追问追答
追问
能否提具体代码，我实验了多次也未能成功！
能否提具体代码，我实验了多次也未能成功！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
