|
Как сделать клавишу-акселератор (keyboard shortcut) компонету, у которого нет заголовкаВозможный вариант - присвоить ссылку на этот компонент свойству FocusControl
TLabel'а. В примере используется невидимый Label для создания "быстрой" клавиши
(Alt+M) компонента Memo. Чтобы использовать пример, разместите на форме
компонент TMemo, Label и несколько других компонентов, которые могут принимать
фокус ввода. Запустите программу, переведите фокус ввода куда-нибудь вне Memo и
нажмите Alt+M - фокус ввода вернется в Memo.
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Visible := false;
Label1.Caption := '&M';
Label1.FocusControl := Memo1;
end;
Название: Как сделать клавишу-акселератор (keyboard shortcut) компонету, у которого нет заголовка Дата публикации: 2004-06-17 (2375 Прочтено) |
|
 |