| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

как узнать что нажата кнопка Esc? [D7, XP]

Страницы:   < 1 2 >

asd00 ©   (2007-11-09 19:22:00) 

как узнать что нажата кнопка Esc?

---

Leonid Troyanovsky   (2007-11-10 01:43:00) [1]

> DVM ©   (09.11.07 22:04) [21]

> Горячую клавишу зарегистрируй.

Это уже, скажем, на уровне десктопа.

--
Regards, LVT.

---

DVM   (2007-11-09 22:04:00) [2]

> ВЫЙТИ ИЗ ПРОГРАММЫ НЕ ЗАВИСИМО ОТ ТОГО КАКОЕ ОКНО АКТИВНО
> В ДАННЫЙ МОМЕНТ

Горячую клавишу зарегистрируй.

---

{RASkov}   (2007-11-09 21:13:00) [3]

> [15] Leonid Troyanovsky ©   (09.11.07 20:40)
> Application.OnMessage

Точно....


> [12] asd00   (09.11.07 20:29)

type
 TForm1 = class(TForm)
......
 private
   procedure AppMess(var Msg: TMsg; var Handled: Boolean);
   { Private declarations }
 public
   { Public declarations }
 end;

.....

procedure TForm1.AppMess(var Msg: TMsg; var Handled: Boolean);
begin
 if (Msg.message=WM_KEYDOWN) and (Msg.wParam = VK_ESCAPE) then Close;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 Application.OnMessage:=AppMess;
end;

> [17] asd00   (09.11.07 20:52)

А это ты прекращай так...

---

Leonid Troyanovsky   (2007-11-09 21:00:00) [4]

> asd00   (09.11.07 20:52) [17]

Не особо умных просим: и надо на нас кричать.
Особенно, глупостями.

--
Regards, LVT.

---

Anatoly Podgoretsky   (2007-11-09 20:55:00) [5]

> asd00  (09.11.2007 20:52:17)  [17]

Не фигасе себе, вставай в очередь за премией.

---

asd00   (2007-11-09 20:52:00) [6]

Anatoly Podgoretsky для особо умных могу повторить: ВЫЙТИ ИЗ ПРОГРАММЫ НЕ ЗАВИСИМО ОТ ТОГО КАКОЕ ОКНО АКТИВНО В ДАННЫЙ МОМЕНТ

---

Leonid Troyanovsky   (2007-11-09 20:43:00) [7]

> asd00   (09.11.07 20:29) [12]

> ладн обойдусь тогда...просто хотел выход из проги по esc.

По Esc выходят из диалогов, см [2]
А, во-ще, Alt-F4, привыкай.

--
Regards, LVT.

---

Leonid Troyanovsky   (2007-11-09 20:40:00) [8]

> {RASkov}   (09.11.07 20:37) [14]

Application.OnMessage

--
Regards, LVT.

---

{RASkov}   (2007-11-09 20:37:00) [9]

> [12] asd00   (09.11.07 20:29)

Если главное окно(форма) программы в момент выхода активно(а), то [1] и свойство у формы KeyPreview = True

if Key=VK_ESCAPE then Close;

---

Anatoly Podgoretsky   (2007-11-09 20:33:00) [10]

> asd00  (09.11.2007 20:29:12)  [12]

Не вешай лапшу на уши, ты сказал что в любом приложении.

---

asd00   (2007-11-09 20:29:00) [11]

> Тогда это драйвер режима ядра


ладн обойдусь тогда...просто хотел выход из проги по esc....

---

Anatoly Podgoretsky   (2007-11-09 20:14:00) [12]

> Leonid Troyanovsky  (09.11.2007 20:12:10)  [10]

Клава отлучилась на пару часов.

---

Leonid Troyanovsky   (2007-11-09 20:12:00) [13]

> {RASkov}   (09.11.07 20:04) [9]

> Ты задачу опиши подробнее....

Чего там писать.
Клава - давай.

--
Regards, LVT.

---

{RASkov}   (2007-11-09 20:04:00) [14]

> [5] Leonid Troyanovsky ©   (09.11.07 19:52)
> Там клавиши.

Клавишы у пианино, а у "клавы" кнопки :)

> [6] asd00   (09.11.07 19:53)

Ты задачу опиши подробнее.... может есть решение проще... Иначе см [8] или даже [7] :)

---

Anatoly Podgoretsky   (2007-11-09 19:57:00) [15]

> asd00  (09.11.2007 19:53:06)  [6]

Глобальный хук, а не рано тебе еще этим заниматься?

---

Anatoly Podgoretsky   (2007-11-09 19:57:00) [16]

> {RASkov}  (09.11.2007 19:51:04)  [4]

Тогда это драйвер режима ядра

---

asd00   (2007-11-09 19:53:00) [17]

в любом окне..

---

Leonid Troyanovsky   (2007-11-09 19:52:00) [18]

> {RASkov}   (09.11.07 19:51) [4]

> Как где??? На клавиатуре :)

Там клавиши.

--
Regards, LVT.

---

{RASkov}   (2007-11-09 19:51:00) [19]

> [3] Anatoly Podgoretsky ©   (09.11.07 19:48)

Как где??? На клавиатуре :)

---

Anatoly Podgoretsky   (2007-11-09 19:48:00) [20]

> asd00  (09.11.2007 19:22:00)  [0]

Где?

---

Страницы:   < 1 2 >

Наверх