Главная страница | назад





Article #17032: Keyboard shortcut to a component that has no caption

 Question and Answer Database
FAQ2032D.txt Keyboard shortcut to a component that has no caption
Category :VCL
Platform :All
Product :All 32 bit
Question:
How can I create a keyboard shortcut to a component that has
no caption?
Answer:
One work around is to leverage the FocusControl property of
TLabel. The following example demonstrates using an invisible
label control to create a keyboard shortcut to a memo control.
The shortcut will respond to the Alt+M key combination. To
use this example, place a label, a memo, and several other
controls that receive focus. Run the application, move focus
to a control other than "Memo1", and key in -M. You should
see focus move to Memo1.
Example:
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Visible := false;
Label1.Caption := '&M';
Label1.FocusControl := Memo1;
end;
7/16/98 4:31:28 PM

Last Modified: 01-SEP-99