如何在数字模式下显示tabtip？

Question

如何使用delphi以编程方式在数字模式下显示tabtip？

当焦点在文本编辑十进制类型上时，我需要虚拟键盘tabtip只显示数字。