NumbersOnly TEdit Delphi提示不起作用

Raf*_*ssi 4 delphi vcl-styles delphi-10-seattle

我正在使用Delphi Seattle,主题是Windows 10,为Windows Desktop创建程序.
TEditif活动NumbersOnly属性中,当您尝试键入单词时,您会看到标准的Windows提示.
如果我离开没有主题的程序,则提示正确显示,并显示消息说明您只能输入数字.但如果活动主题消息不可读.

任何人都知道我可以在哪里更改这个,因为我正在查看内部Vcl.StdCtrls.pas并且找不到向用户生成此消息的时间.

正确提示:

在此输入图像描述

错误提示: 在此输入图像描述

RRU*_*RUZ 8

此问题已在RAD Studio 10.1 Berlin中修复.但是,如果您无法升级您的RAD Studio版本,请尝试VCL Styles Utils包含此修复程序的项目.只需Vcl.Styles.Utils.ScreenTips要将单元添加到项目中.

在此输入图像描述