创建图像窗口
read_image (Image, '1')
*打开图像窗口
dev_open_window (0, 0, 512, 512, 'black', WindowHandle)
dev_display (Image)
get_image_size (Image, Width, Height)
*打开具有给定最小和最大范围的新图形窗口,以便保留给定图像的纵横比。
*WidthLimit设置为-1,则使用以下默认值:[500,800]。
*HeightLimit设置为-1,则使用以下默认值:[400,600]。
*如果根据窗口宽高限制无法创建窗口,则忽略最小窗口大小的限制
*指定一个浮动范围,根据图像宽度、高度和比例关系,建立一个窗口显示图像
dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle1)
*激活窗口
dev_set_window (WindowHandle1)
*显示图像
dev_display (Image)
*打开具有给定最小和最大范围的新图形窗口,以便保留给定图像大小的宽高比
*WidthLimit设置为-1,则使用以下默认值:[500,800]。
*HeightLimit设置为-1,则使用以下默认值:[400,600]。
*如果根据窗口宽高限制无法创建窗口,则忽略最小窗口大小的限制
dev_open_window_fit_size (0, 0, Width, Height, -1, -1, WindowHandle2)
dev_set_window (WindowHandle2)
dev_display (Image)
计算算子运行的时间
*时间单位为秒,乘以1000则为毫秒单位
count_seconds (T1)
read_image (Image, 'fabrik')
get_image_size (Image, Width, Height)
dev_open_window (0, 0, Width, Height, 'black', WindowHandle)
count_seconds (T2)
RunTime := (T2 - T1)*1000
dev_display (Image)
disp_message (WindowHandle, '程序运行的时间: '+RunTime+' ms', 'window', 10, 10, 'black', 'true')