ResizeWindow

Синтаксис

Sub ResizeWindow(ByVal hWin As HWND, ByVal x As Long=FB_ignore, ByVal y As Long=FB_ignore, ByVal w As Long=FB_ignore, ByVal h As Long=FB_ignore)

Описание

Функция изменяет расположение и размеры заданного окна. По умолчанию параметры имеют значение FB_IGNORE (то есть не изменять параметр). Сделано это для того, чтобы была возможность изменять не все параметры сразу, а выборочно. В примере ниже будет показана эта полезная опция.

Параметры

hWin - хендл окна

x,y,w,h - новые параметры расположения и размеров

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As HWND hwnd,hwnd1
hwnd=OpenWindow("Окно 1",10,10,500,500)
hwnd1=OpenWindow("Окно 2",10,10,500,500)
UpdateInfoXServer(20000) ' для гарантии ставим сюда, чтобы изменения размеров прошли 100%
ResizeWindow(hwnd,,,,10) 'Изменяем последний параметр(высоту)
ResizeWindow(hwnd1,100,200,300,300) 'Изменяем все параметры окна
Do
  var event=WaitEvent()
  If Event=EventClose Then End
Loop

Created with the Personal Edition of HelpNDoc: Easily create EBooks