| Функция
RunMenu (String, [Integer, Integer]) : Word |
Top Previous Next |
| Назначение
|
| Функция
запускает меню с именем MenuName. |
| Описание
|
| function
RunMenu (MenuName : String; [X : Integer, Y : Integer]) : Word;
|
| Параметры
|
| MenuName
: String - имя меню для запуска. |
| X,
Y : Integer - необязательные координаты левого верхнего
угла меню. Если эти координаты не указаны или равны -1,-1, то они
берутся от текущего видимого элемента. |
| Возвращаемое
значение |
| Результатом
является команда, которую данное меню сгенерировало.
|
| Пример
|
| case
RunMenu('YESNO') of |
| cmYes: Respond
:= 'ДА'; |
| cmNo,cmCancel:
Respond := 'НЕТ'; |
| end;
|