Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.06.03;
Скачать: [xml.tar.bz2];

Вниз

ord( : ) , ord( ; )   Найти похожие ветки 

 
Gentos   (2007-05-14 11:18) [0]

Уважаемые мастера, каким образом можно определить нажатие клавиш -[];",./
все остальные, которые необходимо было -  qwe...bnm определил, а с этими - [];",./ функция ord не проходит, как можно по-другому ?


 
MBo ©   (2007-05-14 11:44) [1]

А покажи, как ты
>все остальные, которые необходимо было -  qwe...bnm определил


 
Gentos   (2007-05-14 11:51) [2]


procedure TfrmStamina.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var kk : integer;

procedure ClickButton(B: TSpeedButton);
 begin
   B.Perform(WM_LBUTTONDOWN,0,0);
   Application.ProcessMessages;
   Sleep(20);
   B.Perform(WM_LBUTTONUP,0,0);
 end;
begin
 case Key of
   ord("Q"): ClickButton(sbq);
   ord("W"): ClickButton(sbw);
   ord("E"): ClickButton(sbe);
   ord("R"): ClickButton(sbr);
   ord("T"): ClickButton(sbt);
   ord("Y"): ClickButton(sby);
   ord("U"): ClickButton(sbu);
   ord("I"): ClickButton(sbi);
   ord("O"): ClickButton(sbo);
   ord("P"): ClickButton(sbp);
   ord("A"): ClickButton(sba);
   ord("S"): ClickButton(sbs);
   ord("D"): ClickButton(sbd);
   ord("F"): ClickButton(sbf);
   ord("G"): ClickButton(sbg);
   ord("H"): ClickButton(sbh);
   ord("J"): ClickButton(sbj);
   ord("K"): ClickButton(sbk);
   ord("L"): ClickButton(sbl);
   ord("Z"): ClickButton(sbz);
   ord("X"): ClickButton(sbx);
   ord("C"): ClickButton(sbc);
   ord("V"): ClickButton(sbv);
   ord("B"): ClickButton(sbb);
   ord("N"): ClickButton(sbn);
   ord("M"): ClickButton(sbm);
   end;
 end;
end;


 
clickmaker ©   (2007-05-14 11:56) [3]


>  [2] Gentos   (14.05.07 11:51)

почему бы через VK_xxx не сделать?
и может завести массив кнопок, и в качестве индекса передавать код?


 
Knight ©   (2007-05-14 11:58) [4]

> [2] Gentos   (14.05.07 11:51)

А если на Q а q?


 
Плохиш ©   (2007-05-14 11:59) [5]


> Gentos   (14.05.07 11:18)  
> а с этими - [];",./ функция ord не проходит

Не люблю врунов...


 
MBo ©   (2007-05-14 12:00) [6]

Virtual key codes
VK_** константы в windows.pas

А сам мог посмотреть так:
 Caption := IntToStr(Key);


 
Gentos   (2007-05-14 12:01) [7]


> clickmaker ©  


та по разному можно :) , что касается vk_xxx есть только стандартные типа vk_space, vk_return, а того, чего мне надо нет , так что , я уже нашел то что хотел, тему считаю закрытой, а может на сам деле массив кнопок забабахаю



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.06.03;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.051 c
15-1178819495
Knight
2007-05-10 21:51
2007.06.03
Пенсия и работа у частника&#133


15-1178458451
Kostafey
2007-05-06 17:34
2007.06.03
Использование переменной-счетчика цикла после выхода из оного


15-1178625260
ZeroDivide
2007-05-08 15:54
2007.06.03
Георгиевская лента на автомобилях немецкого производства!


2-1178957175
GDB
2007-05-12 12:06
2007.06.03
Firebird


15-1178828840
РТР
2007-05-11 00:27
2007.06.03
Посоветуйте пожалуйста socs5 - прокси сервер под винду





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский