ImgPath := '3d_machine_vision/calib/'
dev_close_window ()
dev_open_window (0, 0, 652, 494, 'black', WindowHandle)
dev_update_off ()
dev_set_draw ('margin')
dev_set_line_width (3)
*获得当前的系统:windows
OpSystem := environment('OS')
set_display_font (WindowHandle, 14, 'courier', 'true', 'false')
*