需求分析

在使用Halcon加载图像时，点击Halcon的适应窗口，图像都会按照窗口大小对图像进行拉伸后显示，实际项目中，需要等比例显示图像，体现图像原本的尺寸细节和效果，特别是在Qt或VS中，需要方便调节，这里记录一下等比例显示图像的原理和实现方法。

Halcon显示原理

Halcon显示图像的原理就是去调节视场大小，相当于图像的尺寸大小是固定的，通过调节相机高度和视野去适配图像的大小，这样图像的实际尺寸就不会被缩放。
Halcon中一般使用dev_set_part这个算子，算子四个参数，主要对应的是Halcon视场的左上和右下对应的行列尺寸，比如说图像宽度是500，你想显示的时候左右各留100空余背景，这时列的设置就是（-100，500+100），相当于从-100开始，将图像移动到中间。

显示实现

实际显示的时候，不仅要考虑图像的纵横比，还要考虑控件窗口的纵横比，如果图像的宽高比大于窗口的宽高比，这个时候就把图像的宽度方向靠近边缘，高度方向上下预留空白。

picWHRatio := 1.0 * Width / Height
winWHRatio := 1.0 * winWidth / winHeight
    if (picWHRatio >= winWHRatio)
        * 如果图片宽高比 大于 窗口宽高比
        * 则宽度方向顶格
        dispWidth := Width
        dispHeight := Width / winWHRatio
        offset:=(dispHeight-Height)/2
        dev_set_part (-offset, 0, dispHeight-offset, dispWidth)

如果图像的宽高比小于窗口的宽高比，这个时候就把图像的高度方向靠近边缘，宽度方向左右预留空白。

picWHRatio := 1.0 * Width / Height
winWHRatio := 1.0 * winWidth / winHeight
if (Width > winWidth or Height > winHeight)
    if (picWHRatio < winWHRatio)
        * 如果图片宽高比 小于 窗口宽高比
        * 则高度方向顶格
        dispWidth := Height * winWHRatio
        dispHeight := Height
        offset:=(dispWidth-Width)/2
        dev_set_part (0, -offset, dispHeight, dispWidth-offset)

如果图像的尺寸均小于控件的尺寸，此时将图像的尺寸乘以控件的纵横比之后再像上边进行比较。

    * 如果图片的长和宽都小于窗口
    if(picWHRatio >= winWHRatio)
        dispWidth := Width
        dispHeight := Width / winWHRatio
        offset:=(dispHeight-Height)/2
        dev_set_part (-offset, 0, dispHeight-offset, Width)
    else
        dispWidth := Height * winWHRatio
        dispHeight := Height
        offset:=(dispWidth-Width)/2
        dev_set_part (0, -offset, dispHeight, dispWidth-offset)
    endif  

具体实现Halcon代码

dev_close_window ()
dev_open_window (0, 0, 400, 400, 'gray', WindowHandle)
dev_clear_window ()
dev_update_window ('off')

read_image (Image, 'C:/Users/Administrator/Desktop/lena小尺寸.png')
get_window_extents (WindowHandle, Row, Column, winWidth, winHeight)

set_system ('int_zooming', 'false')
get_image_size (Image, Width, Height)
picWHRatio := 1.0 * Width / Height
winWHRatio := 1.0 * winWidth / winHeight
if (Width > winWidth or Height > winHeight)
    if (picWHRatio >= winWHRatio)
        * 如果图片宽高比 大于 窗口宽高比
        * 则宽度方向顶格
        dispWidth := Width
        dispHeight := Width / winWHRatio
        offset:=(dispHeight-Height)/2
        dev_set_part (-offset, 0, dispHeight-offset, dispWidth)
    else
        * 如果图片宽高比 小于 窗口宽高比
        * 则高度方向顶格
        dispWidth := Height * winWHRatio
        dispHeight := Height
        offset:=(dispWidth-Width)/2
        dev_set_part (0, -offset, dispHeight, dispWidth-offset)
    endif
else
    * 如果图片的长和宽都小于窗口
    if(picWHRatio >= winWHRatio)
        dispWidth := Width
        dispHeight := Width / winWHRatio
        offset:=(dispHeight-Height)/2
        dev_set_part (-offset, 0, dispHeight-offset, Width)
    else
        dispWidth := Height * winWHRatio
        dispHeight := Height
        offset:=(dispWidth-Width)/2
        dev_set_part (0, -offset, dispHeight, dispWidth-offset)
    endif  
endif
dev_display (Image)