| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сочетание клавиш [D7]
AlexanderMS © (2006-03-26 19:20:00)На форме - объект типа TPageControl . Как мне можно огранизовать переключение на 1-ую страницу сочетанием клавиш, допустим, CTRL + 1, а на вторую - CTRL + 2. Как "отловить" нажатие подобных сочетаний клавиш?
AlexanderMS (2006-03-26 19:34:00) [1]Большое спасибо, работает!
Dmitrij_K (2006-03-26 19:28:00) [2]У формы поставь KeyPreview := True;
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key in [Ord('0')..Ord('9')]) and (ssCtrl in Shift) then
case key of
Ord('0') : ;
Ord('1') : ;
Ord('2') : ;
end
end;
| |
