Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB29Shortcut.shtml

Глава 29. TMenuItem.Shortcut

Свойство Shortcut

Затрагиваемые объекты TMenuItem
Назначение Свойство Shortcut определяет клавиатурное сокращение, которое можно использовать для активизации события OnClick элемента меню.
Объявление property Shortcut: TShortCut;
Пример синтаксиса
procedure TForm1.FormCreate(Sender: TObject);
begin
   Cut1.Shortcut := Shortcut(Word('X'),[ssCtrl]);
   Copy1.Shortcut := Shortcut(Word('C'),[ssCtrl]);
   Paste1.Shortcut := Shortcut(Word('T'),[ssCtrl]);

end;
Описание

       Клавиатурное сокращение элемента меню появляется справа от заголовка элемента меню и указывает сочетание клавиш, которое будет активизировать событие OnClick элемента. Последнее показано на рисунке 29-6.


РИСУНОК 29-6 Сокращения для меню Edit

       Проще всего создать сокращения — известные также как клавиши ускорения (accelerator keys) — во время конструирования в Object Inspector, однако, если элементы меню создаются динамически, сокращения можно назначить во время выполнения посредством глобальной функции Shortcut. Функция Shortcut объявлена как

function ShortCut(Key: Word; Shift: TShiftState): TShortCut;

       Если требуется создать сокращение <Ctrl>+<C>, определение должно выглядеть следующим образом:

Copy1.Shortcut := Shortcut(Word('X'),[ssCtrl]);

       Первый параметр Key будет завершающим символом в сокращении, преобразованным в Word. В данном случае клавишей является X. Параметр Shift представляет специальную клавишу, которая удерживается нажатой во время нажатия другой клавиши, и объявлен как

TShiftState = set of (ssShift,ssAlt,ssCtrl,ssLeft,ssRight,ssMiddle, ssDouble);

       где ssShift представляет клавишу <Shift>, ssAlt — клавишу <Alt> и т.д.

[Метод Add] [Свойство Break] [Свойство Caption] [Свойство Checked] [Метод Click] [Свойство Count] [Свойство Default] [Метод Delete] [Свойство Enabled] [Свойство GroundIndex] [Свойство Handle] [Свойство HelpContext] [Метод IndexOf] [Метод Insert] [Свойство Items] [Свойство MenuIndex] [Событие OnClick] [Свойство Parent] [Свойство RadioItem] [Метод Remove] [Свойство Shortcut] [Свойство Visible]


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:55 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB29Shortcut.shtml