forum.boolean.name - Обработка нажатия кнопок в меню ?

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - Обработка нажатия кнопок в меню ? (http://forum.boolean.name/showthread.php?t=14284)

Marat_best

23.02.2011 05:07

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

есть код

Цитата:

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	23.02.2011 13:50

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

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

AVL	23.02.2011 14:04

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

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

clicked:=GetClickedCommand;
until clicked <> EmptyCommand;

Marat_best

23.02.2011 16:10

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

Цитата:

Сообщение от ViNT (Сообщение 180147)

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

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

Marat_best

23.02.2011 16:11

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

Цитата:

Сообщение от AVL (Сообщение 180148)

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

clicked:=GetClickedCommand;
until clicked <> EmptyCommand;

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

cherepets

23.02.2011 17:00

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

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

AVL	23.02.2011 17:11

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

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

Часовой пояс GMT +4, время: 15:02.