Отпустить кнопку

@romanzi · Регистрация: 14.12.2010

Мне нужно сделать вот такую фигню:
Если я отпускаю (Не нажимаю!) ( Может через OnKeyUp ?) кнопку "Вверх" (VK_UP, число 38), то timer1 выключается.

@Puporev · 15.01.2012, 20:19

Сообщение от romanzi

Может через OnKeyUp ?

Может. А взять да попробовать?

@romanzi · 15.01.2012, 22:52 **[ТС]**

Как проверяется это, не могу понять. (отпустил ли я VK-UP)
Статей на такую тему не нашёл.

Как onKeyUp'нуть VK-UP ??

@Puporev · 16.01.2012, 07:29

Delphi

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=VK_Up then Showmessage('Отпущена клавиша 38');
end;

@romanzi 13 / 13 / 1 Регистрация: 14.12.2010 Сообщений: 316
		1
	Отпустить кнопку 15.01.2012, 18:29. Показов 1182. Ответов 3 Метки нет (Все метки) Мне нужно сделать вот такую фигню: Если я отпускаю (Не нажимаю!) ( Может через OnKeyUp ?) кнопку "Вверх" (VK_UP, число 38), то timer1 выключается. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	15.01.2012, 20:19	2
	Сообщение от romanzi Может через OnKeyUp ? Может. А взять да попробовать? 1

@romanzi 13 / 13 / 1 Регистрация: 14.12.2010 Сообщений: 316
	15.01.2012, 22:52 [ТС]	3
	Как проверяется это, не могу понять. (отпустил ли я VK-UP) Статей на такую тему не нашёл. Как onKeyUp'нуть VK-UP ?? 0

	16.01.2012, 07:29