delphi 如何删除快捷键中的“&”字符?

33qvvth1  于 2023-10-18  发布在  其他
关注(0)|答案(1)|浏览(116)

我正在使用'&'字符来使用TLabel控件的快捷键。通过这种方式,用户可以在&之后按Alt+Character,以便将控件聚焦到窗体上。

示例:

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'

相关问题