Draw a point.
draw_point_mod returns the parameter for a point, which has been created interactively by the user in the window.
To create a point are expected the coordinates RowIn and ColumnIn. While keeping the button pressed you may ``drag'' the point in any direction. Pressing the right mousebutton terminates the procedure.
After terminating the procedure the point is not visible in the window any longer.
|
WindowHandle (input_control) |
window -> integer |
| Window_id. | |
|
RowIn (input_control) |
point.y -> real |
| Row index of the point. | |
|
ColumnIn (input_control) |
point.x -> real |
| Column index of the point. | |
|
Row (output_control) |
point.y -> real |
| Row index of the point. | |
|
Column (output_control) |
point.x -> real |
| Column index of the point. | |
get_system('width',Width)
get_system('height',Height)
set_part(WindowHandle,0,0,Width-1,Height-1)
read_image(Image,'affe')
disp_image(Image,WindowHandle)
draw_point_mod(WindowHandle,Row1,Column1)
disp_line(WindowHandle,Row1-2,Column1,Row1+2,Column1)
disp_line(WindowHandle,Row1,Column1-2,Row1,Column1+2)
disp_image(Image,WindowHandle)
fwrite_string(['Clipping = (',Row1,',',Column1,')'])
fnew_line().draw_point_mod returns 2 (H_MSG_TRUE), if the window is valid and the needed drawing mode is available. If necessary, an exception handling is raised.
draw_point_mod is reentrant, local, and processed without parallelization.
reduce_domain, disp_line, set_colored, set_line_width, set_draw, set_insert
draw_point, draw_circle, draw_ellipse, set_insert
Foundation
