|
|
![]() |
![]() |
![]() |
Как
сделать клавишу-акселератор (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;
Источник:
Дельфи. Вокруг да
около.
|
| Copyright ©
"Мастера DELPHI" E-mail:
delphi@mastak.com
http://www.delphimaster.ru |
| Источник получения информации: http://www.delphimaster.ru
|
|
