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

Вниз

Как отловить нажатие клавиши...   Найти похожие ветки 

← →
GogaStar   (2004-02-19 12:21) [0]

Как отловить например нажатие клавиши SHIFT при запуске приложения. Желательно после Application.Initialize;

---

← →
Дед   (2004-02-19 12:24) [1]

Ловить по OnKeyUp не хочется?

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
{ обработка события }
end;

---

← →
GogaStar   (2004-02-19 12:30) [2]

Хочется при инициализации приложения исключить ненужные расчеты.
И запускать с параметром тоже не хочется.

---

← →
clickmaker   (2004-02-19 12:34) [3]

ShiftDown := ((GetKeyState(VK_SHIFT) shr 8) <> 0)

---

← →
GogaStar   (2004-02-19 12:41) [4]

Огромное спасибо.

---

← →
Дед   (2004-02-19 12:42) [5]

> clickmaker

А где VK_SHIFT взять?

---

← →
clickmaker   (2004-02-19 12:45) [6]

> Дед (19.02.04 12:42) [5]
>
> > clickmaker
>
> А где VK_SHIFT взять?

uses Windows

---

← →
GogaStar   (2004-02-19 12:46) [7]

Unit Windows

---

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

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

Наверх

Память: 0.45 MB
Время: 0.008 c