Изменяет размер меню, созданного DEFINE POPUP.

SIZE POPUP MenuName TO nRow1, nColumn1 | BY nRow2, nColumn2

Параметры

MenuName

Определяет имя меню, размер которого Вы хотите изменить.
TO nRow1 , nColumn1

Изменяет размер меню до определенного размера. nRow1 и nColumn1 определяют новую строку и координаты столбца соответственно, для нижнего правого угла меню.
BY nRow2 , nColumn2

Изменяет размер меню относительно его текущего размера. nRow2 и nColumn2 определяют изменение в размерах меню в строках и столбцах, относительно координат текущей строки и столбца нижнего правого угла меню.

Замечания

Если определяемое пользователем меню было создано, то его размер может быть изменен; оно не должно быть обязательно активным или видимым.

Пример

Этот пример создает меню, содержащее имена файлов с расширением .prg и передвигает, увеличивает и уменьшает меню перед его закрытием.

Скопировать код
CLEAR
DEFINE POPUP popMovIn FROM 2,2 TO 7, 14 PROMPT FILES LIKE *.PRG ;
   TITLE 'Programs'
ACTIVATE POPUP popMovIn NOWAIT
=CHRSAW(2)
MOVE POPUP popMovIn BY 5,5     && Move popup down
=CHRSAW(2)
SIZE POPUP popMovIn BY 5,5  && Enlarge the popup
=CHRSAW(2)
SIZE POPUP popMovIn BY -5,-5  && Shrink the popup
=CHRSAW(2)
MOVE POPUP popMovIn BY -5,-5  && Move popup up
=CHRSAW(2)
DEACTIVATE POPUP popMovIn
RELEASE POPUP popMovIn

См. Также