如何去除加速器热键'&'字符？

Question

我使用 '&' 字符将加速键与我的 TLabel 控件一起使用。这样，用户可以按 Alt+& 后的字符，以便将控件集中在窗体上。

示例：

var
  MyLabel : TLabel;
  MyEdit : TEdit;
begin
  MyEdit := TEdit.Create(Self);
  MyEdit.Left := 20;
  MyEdit.Top := 40;
  MyEdit.Parent := Self;

  MyLabel := TLabel.Create(Self);
  MyLabel.FocusControl := MyEdit;
  MyLabel.Caption := '&Test';
  MyLabel.Left := 20;
  MyLabel.Top := 20;
  MyLabel.Parent := Self;
end;

在这种情况下，MyLabel 出现时 'T' 字符带有下划线，按 Alt+T 会导致MyEdit要专注。

如果没有 '&' 字符，我如何获得 MyLabel.Caption？是否有任何内置函数可以执行此操作？

我希望得到 'Test' 字符串而不是 '&Test'

Answer 1

您正在查找 StripHotKey 函数。

如何去除加速器热键'&'字符？

How to remove the accelerator hot key '&' character?

delphi

keyboard-shortcuts

delphi-2007

acceleratorkey