5

我正在使用该字符在我的控件'&'中使用加速键。TLabel这样，用户可以按Alt+Character after the &以将控件集中在表单上。

例子：

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'

4

1 回答 1

14

您正在寻找该StripHotKey功能。

于 2018-05-17T16:06:58.770 回答