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

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

нажатый shift


Мурзилка ©   (2006-05-19 19:05:00) 

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

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


begin...end   (2006-05-19 19:57:00) [1]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо