Команда MOVE POPUP

Перемещает меню, определенное пользователем с помощью команды DEFINE POPUP, или системное меню FoxPro для MS-DOS (такое как _MFILE, MEDIT или _MDATA) на новое место.

Синтаксис:

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

Параметры:
MenuName
Задает перемещаемое меню.
В Visual FoxPro, FoxPro для Windows и FoxPro для Macintosh нельзя перемещать системные меню.
TO nRow1, nColumn1
Перемещает меню на место, заданное координатами nRow1, nColumn1, в пользовательском окне или основном окне Visual FoxPro.
BY nRow2, nColumn2
Перемещает меню на место, указанное относительно его текущей позиции. nRow2 задает число строк, на которое нужно переместить меню (вниз, если значение nRow2 положительно, вверх, если оно отрицательно). Числовое выражение nColumn2 задает число столбцов, на которое перемещается меню (вправо, если значение nColumn2 положительно, влево, если оно отрицательно).

Комментарии:
Меню можно перемещать на конкретное место или относительно его текущей позиции. Если меню определено, его уже можно перемещать, оно не обязательно должно быть активным или видимым.

Пример:

* В следующем примере программа определяет и активизирует меню, а
* затем перемещает его и изменяет его размеры.

CLOSE DATABASE
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 menu down
=CHRSAW(2)
SIZE POPUP popMovIn BY 5,5	&& Enlarge the menu
=CHRSAW(2)
SIZE POPUP popMovIn BY -5,-5	&& Shrink the menu
=CHRSAW(2)
MOVE POPUP popMovIn BY -5,-5	&& Move menu up
=CHRSAW(2)
DEACTIVATE POPUP popMovIn
RELEASE POPUP popMovIn

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем.