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

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

PageControl и горячие клавищи [D7, WinXP]


Russko ©   (2004-08-17 12:05:00) 

Каким образом можно сделать так чтобы, например, при сочетании клавиш ctrl+pagedown менялась закладка в PageControl на следующую.


46_55_41_44   (2004-08-17 12:43:00) [1]

хотя помоему Ctrl-Tab и так переносит


46_55_41_44   (2004-08-17 12:19:00) [2]

на форме поставь KeyPreview значение True...
Затем в OnKeyDown формы напиши:

if (key = 34) and Shift = [ssCtrl] then
begin
 if PageControl.ActivePageIndex - 1 < PageControl.PageCount then
PageControl.ActivePageIndex := PageControl.ActivePageIndex + 1
 else
   PageControl.ActivePageIndex := 0;
end;


Наверх

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