Изменение размера области рендера

[bugway]

Использую функцию xSetRenderWindow для вывода графики в элемент управления на форме. Не могу понять, как правильно изменять размер этой области. Делаю так: (код PowerBasic 10)

...
xSetRenderWindow hCtl        'set render area to image control
xSetTopWindow  hDlgMW        'set main window as input window
...
xGraphics3D(DWidth& ,DHeight& ,0,0,0)     'Desktop width and height
...

далее обрабатываю сообщение WM_SIZE:

cw = LO(WORD, CB.LPARAM)                    'new main window width
ch = HI(WORD, CB.LPARAM)                    'new main window height
CONTROL SET SIZE hDlgMW,2,cw*0.70,ch        'image contol width=70% width of main window

xCameraViewport(Camera, 0, 0, cw, ch)        'is it correct???

DIALOG SET TEXT hDlgMW,STR$(cw)
xcls
Render3d

но получаю такое:


В чем может быть прикол? Идеи есть?

[pozitiffcat]

А если просто изменить размер области просмотра камеры? Например было столько - то а при нажатии кнопки изменить. Изменится или нет?

[bugway]

Судя по всему, viewport создается и ресайзится правильно, трабла в стретчинге (stretch) окна вывода (использую image control). Только не пойму, трабла в xors3d или PB10...

[bugway]

УРА! Разобрался!

Пришлось помудрить, но результат того стоит. Вот основная идея сабжа:

Идея состоит в том, что лишняя часть картинки рендера обрезается и показывается только область viewport.

1) Установить размер бекбуфера равный текущему разрешению рабочего стола
2) Установить viewport равный области вывода
3) областью вывода будет IMAGE CONTROL

Но тут есть ньюанс:

1. Если напрямую изменять размер IMAGE CONTROL, то картинка рендера растягивается (как в посте 1)

Для преодоления данного ограничения воспользуемся дополнительным родительским элементом FRAME, засунув в него IMAGE CONTROL. Изменять размеры будем не IMAGE CONTROLа (размеры которого установим равными размерам рабочего стола), а именно FRAME контрола, который скроет "лишнюю" часть области рендера (IMAGE контрола) и будет содержать только область Viewport`а.

Размеры окна теперь можно без проблем менять:

[bugway]

Единственное, с чем нужно еще разобраться - при изменении размера главного окна область рендера "мигает", что сильно напрягает. Есть идеи как это пофиксить?

[bugway]

Вот и нашел решение (слишком быстро, чем ожидал):

надо вместо контейнера FRAME использовать GRAPHIC со стилем окна %WS_CLIPCHILDREN, а дочерний элемент тоже использовать GRAPHIC. Тогда мелькания не будет. У главного окна тоже должен быть стиль %WS_CLIPCHILDREN.

[MadMedic]

А проблем с управлением (мышь, клава) не возникает? На пурбейсике когда то меня подобный трик остановил только из-за затыков с инпутом

[bugway]

Для корректной работы с вводом нужно ОБЯЗАТЕЛЬНО использовать функцию:

xSetTopWindow  hDlgMW        'set main window as input window

где параметр hDlgMW - это hWND того окна, которое будет обрабатывать сообщения.

[MadMedic]

Я начинал когда еще не было этой функции. Теперь извраты с хуками на окно не нужны ))