PageControl и горячие клавищи

← →
Russko (2004-08-17 12:05) [0]

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

← →
46_55_41_44 © (2004-08-17 12:19) [1]

на форме поставь 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;

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

PageControl и горячие клавищи Найти похожие ветки