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

Функция возвращает последнюю нажатую команду или команду EmptyCommand если ничего не было нажато.

function GetClickedCommand: command;
 



Пример

var exitCmd, clicked: command;
begin
    exitCmd := CreateCommand('Выход', CM_EXIT, 1);
    AddCommand(exitCmd);
    repeat
      clicked := GetClickedCommand;
    until clicked <> EmptyCommand;
end.





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

MIDP1.0




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

Не требуется




Смотри также

CreateCommand, AddCommand, RemoveCommand, EmptyCommand