Обработка нажатия кнопок в меню ?

[Marat_best]

есть код

program NewProject;
var tetris, minesweeper, snake : integer;
play, clicked : command;
i: integer;
begin
showMenu('Select a game', CH_IMPLICIT);
tetris := menuAppendString('Tetris');
minesweeper := menuAppendString('Minesweeper');
snake := menuAppendString('Snake');
play := createCommand('Play', CM_SCREEN, 1);
addCommand(play);
repeat
delay(100);
clicked := getClickedCommand;
i:=GetKeyPressed;
until (clicked = play) or (i<>0);
showCanvas;
end.

как отловить нажатие клавиш ?
мне нужно нажатие интер или середина джостика
пробывал GetKeyClicked не работает

[ViNT]

Формы и меню (по сути тоже форма) обрабатывают только команды, кнопки доступны только в Canvas.

[AVL]

Вроде надо использовать примерно такое:

clicked:=GetClickedCommand;
until clicked <> EmptyCommand;

[Marat_best]

Сообщение от ViNT

Формы и меню (по сути тоже форма) обрабатывают только команды, кнопки доступны только в Canvas.

ни как не реализовать ?

[Marat_best]

Сообщение от AVL

Вроде надо использовать примерно такое:

clicked:=GetClickedCommand;
until clicked <> EmptyCommand;

как поймать именно Интер или нажатие джойстика ?

[cherepets]

Надо создать команду CM_OK.
Если GetClickedCommand будет равен этой команде - среднюю кнопку нажали.

[AVL]

Но это еще от телефона зависит, например где-то CM_OK будет на левом софте, где-то на правом