Текущий архив: 2006.06.04;
Скачать: CL | DM;

Вниз

нажатый shift   Найти похожие ветки 

← →
Мурзилка   (2006-05-19 19:05) [0]

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
//
end;

как узнать, что шифт нажат?

---

← →
begin...end ©   (2006-05-19 19:57) [1]

if ssShift in Shift then
 // shift нажат

---

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

Текущий архив: 2006.06.04;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.035 c