Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Основной форум

Основной форум Сюда все проблемы связанные с программированием.

Ответ
 
Опции темы
Старый 29.08.2011, 12:20   #1
Rock2roll
Знающий
 
Аватар для Rock2roll
 
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений
(для 13 пользователей)
Код кнопок

Мне надо знать код клавиш регуляции громкости.
Методом драв стринг (кей) работают все кроме клавиш громкости.
__________________
G502, GT S5230w user!
(Offline)
 
Ответить с цитированием
Старый 29.08.2011, 12:21   #2
Rock2roll
Знающий
 
Аватар для Rock2roll
 
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений
(для 13 пользователей)
Ответ: Код кнопок

Но тем не менее в одном ява-плеере когда жмёшь эти регуляторы- приложение ресут соунд бар, где падает и опускается громкость. КОроче доступ к ним есть
__________________
G502, GT S5230w user!
(Offline)
 
Ответить с цитированием
Старый 31.08.2011, 19:48   #3
PassCall
Разработчик
 
Аватар для PassCall
 
Регистрация: 07.04.2011
Адрес: Млечный путь, Земля, Европа, Беларусь, Могилев
Сообщений: 391
Написано 94 полезных сообщений
(для 319 пользователей)
Ответ: Код кнопок

Сообщение от AngeLvKedaX Посмотреть сообщение
Методом драв стринг (кей) работают все кроме клавиш громкости.
и не только... софты вот тоже по умолчанию не существуют

А насчет кнопок - вот держи маленький мидлет, поймеш как он работает.

Только учти что не во всех телефонах коды одинаковые.



P.S.
Если интересно, вот исходник:
program KeyHelper;
var
i:integer;
key:integer;
exit:boolean;

begin


drawtext ('Нажми увиличение громкости',0,0);
repaint;

key:=0;
exit:=false;
repeat
for i:=-50 to 50 do
if (GetKeyPressed=i) and (i<>0) then begin exit:=true; key:=i; end;
until (exit=true);

setcolor (255,255,255);
fillrect (0,0,240,320);
setcolor (0,64,0);

drawtext ('Код: '+key,0,0);
repaint;
delay (2012);


setcolor (255,255,255);
fillrect (0,0,240,320);
setcolor (0,64,0);

drawtext ('Нажми уменьшение громкости',0,0);
repaint;

key:=0;
exit:=false;
repeat
for i:=-50 to 50 do
if (GetKeyPressed=i) and (i<>0) then begin exit:=true; key:=i; end;
until (exit=true);

setcolor (255,255,255);
fillrect (0,0,240,320);
setcolor (0,64,0);

drawtext ('Код: '+key,0,0);
repaint;
delay (2012);
end.
Вложения
Тип файла: rar bin.rar (3.3 Кб, 422 просмотров)
__________________
Мечта программиста: запрограммировать процесс программирования.

Всё гениальное - просто.

http://passcall.ucoz.com
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Igor (01.09.2011)
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


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


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com