M I D l e t P a s c a l
EmptyCommand

Возвращает пустую команду. Данную команду НЕЛЬЗЯ добавлять на экран (это приведет к сбою в программе), данная команда используется только для сравнения при ожидании ввода какой-либо другой команды.

function EmptyCommand:command;
 



Пример

var exit, clicked:command;
begin
    ShowForm;
    exit := CreateCommand('Выход', CM_EXIT, 1);
    AddCommand(exit); // Добавляем команду на экран
    repeat
      clicked := GetClickedCommand; // Считываем текущую нажатую команду
    until clicked <> EmptyCommand; // Ждем пока не будет нажата хоть какая-то команда
    if clicked = exit then Halt;
    // Далее идет еще какой-то код...
end.





Совместимость

MIDP1.0




Требуемый модуль

Не требуется




Смотри также

CreateCommand, GetClickedCommand, AddCommand, RemoveCommand