Draw a rectangle parallel to the coordinate axis.
draw_rectangle1_mod returns the parameter for a rectangle parallel to the coordinate axes, which has been created interactively by the user in the window.
To create a rectangle are expected the parameters Row1In, Column1In,Row2In und Column2In. After a mouse click in the middle of the created rectangle you can move it. A click close to one side ``grips'' it to modify the rectangle's dimension in perpendicular direction to this side. If you click on one corner of the created rectangle, you may move this corner. Pressing the right mousebutton terminates the procedure.
After terminating the procedure the rectangle is not visible in the window any longer.
|
WindowHandle (input_control) |
window -> integer |
| Window_id. | |
|
Row1In (input_control) |
rectangle.origin.y -> real |
| Row index of the left upper corner. | |
|
Column1In (input_control) |
rectangle.origin.x -> real |
| Column index of the left upper corner. | |
|
Row2In (input_control) |
rectangle.corner.y -> real |
| Row index of the right lower corner. | |
|
Column2In (input_control) |
rectangle.corner.x -> real |
| Column index of the right lower corner. | |
|
Row1 (output_control) |
rectangle.origin.y -> real |
| Row index of the left upper corner. | |
|
Column1 (output_control) |
rectangle.origin.x -> real |
| Column index of the left upper corner. | |
|
Row2 (output_control) |
rectangle.corner.y -> real |
| Row index of the right lower corner. | |
|
Column2 (output_control) |
rectangle.corner.x -> real |
| Column index of the right lower corner. | |
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_rectangle1_mod(WindowHandle,Row1In,Column1In,Row2In,Column2In,Row1,Column1,Row2,Column2)
set_part(WindowHandle,Row1,Column1,Row2,Column2)
disp_image(Image,WindowHandle)
fwrite_string(['Clipping = (',Row1,',',Column1,')'])
fwrite_string([',(',Row2,',',Column2,')'])
fnew_line().draw_rectangle1_mod returns 2 (H_MSG_TRUE), if the window is valid and the needed drawing mode (see set_insert) is available. If necessary, an exception handling is raised.
draw_rectangle1_mod is reentrant, local, and processed without parallelization.
reduce_domain, disp_region, set_colored, set_line_width, set_draw, set_insert
draw_rectangle1, draw_rectangle2, draw_region
gen_rectangle1, draw_circle, draw_ellipse, set_insert
Foundation
