鼠标实时拖动区域显示问题

1. * 鼠标左键触发移动，右键确认
   
2. read_image (Image, 'E:/HALCON IMAGE/OPT-RI10075-R.1.bmp')
   
3. gen_rectangle1 (Rectangle, 0, 0, 200, 200)
   
4. get_mbutton (3600, Row, Column, Button)
   
5. while(1)   
   
6.    get_mposition (3600, Row1, Column1, Button)
   
7.    if(1 = Button)      
   
8.         dev_clear_window ()      
   
9.         dev_display (Image)
   
10.         gen_rectangle1 (Rectangle, Row1 - 100, Column1 - 100, Row1 + 100, Column1 + 100)
    
11.    endif
    
12.    if(4 = Button)
    
13.        break
    
14.    endif
    
15. endwhile

复制代码

注：以上代码给新手提供一个思路，哇咔咔！

mark mark  

赞一个:D:D:D:D:D

我发现了一个不错的算子，可以交互式的生成轮廓，通过拖拽还可以修改位置和尺寸。
部分代码如下：

1. read_image(Image,'D:/xYzCalib/image_01.png')
   
2. *Read an image
   
3. draw_circle_mod(3600, 300, 300, 200, Row, Column, Radius)
   
4. *Draw a cirlce at the specified coordinate ,at the same time which can be modified by dragging it including it coordinate and radius
   
5. CircleEndAngleDeg:=360
   
6. tuple_rad(CircleEndAngleDeg,CircleEndAngleRad)
   
7. gen_circle_contour_xld(ContCircle, Row, Column, Radius, 0, CircleEndAngleRad, 'positive', 1)

复制代码

xYz_Albert 发表于 2017-4-18 10:48
我发现了一个不错的算子，可以交互式的生成轮廓，通过拖拽还可以修改位置和尺寸。
部分代码如下：
read_ima ...

谢谢谢谢谢谢谢！！！！！！一万个谢

虽然有更简单的方法，但是您的使用方法更奇妙，谢谢！！！！！！

不错，这个思路可以哈。。。

Thanks for your share

学习一下

学习一下.............................................