Еще раз про управление скролом в window

[AndyD]

Вот небольшая функция

    void ScrollWindow(int hWnd, boolean VertScroll, int delta)
    {
        int pos, minpos, maxpos, pagesize;
        container c;
        #winapi
        ;
        c = winapi::getScrollInfo(hWnd, VertScroll ? #SB_VERT : #SB_HORZ);
        if (conlen(c) == 4)
            [minpos, maxpos, pagesize, pos] = c;
        else
            throw error(strfmt("Код ошибки %1", conpeek(c, 1)));

        if (pos + delta < minpos) pos = minpos;
        else if (pos + delta > maxpos) pos = maxpos;
        else pos += delta;
        winapi::setScrollPos(hWnd, VertScroll ? #SB_VERT : #SB_HORZ, pos);
        winapi::sendMessageEx(hWnd, VertScroll ? #WM_VSCROLL : #WM_HSCROLL, (pos << 16) | #SB_THUMBPOSITION, 0);
    }
    ;
    ScrollWindow(PictWindow.hWnd(), true, 20);
    ScrollWindow(PictWindow.hWnd(), false, 20);

В принципе двигать скроллер можно и функцией PictWindow.scrollInfo();