Тема: карта на bitmap
Показать сообщение отдельно
  #8  
Старый 03.07.2009, 11:39
Аватар для mak-karpov
mak-karpov mak-karpov вне форума
Активный
  
Регистрация: 18.09.2008
Сообщения: 235
Версия Delphi: 2010 и 7
Репутация: 1242
По умолчанию
используй GetKeyState по таймеру.
Код:
if (GetKeyState(Ord('w')) < 0) and Form1.Active then ...

или поставь у формы свойство KeyPreview в true
__________________
Кнопка "+" - весы в правом верхнем углу сообщения...
Ответить с цитированием