delphi - 如何在 TMenuOption 中显示希腊符号

Question

在Delphi 2010中，我想在TMenuOption和其他类型的VCL控件中显示希腊符号(alpha、beta等)。

分配

   TEdit.Text or TMenuItem.Caption := 'Hydrogen ' + chr(945)  + ' More Text'

看起来工作正常。

我担心这可能不适用于所有机器。 TEdit 有一个字体属性，TMenuItem 没有，所以我猜测它使用一些默认的系统字体。

无论字体如何，chr(945) 都应该始终显示为希腊字母字符吗？如果没有，我是否有某种方法可以确保 chr(945) 始终作为字母字符显示在屏幕上，而不是硬连接字体(这对于系统字体来说很难做到......)

TIA

Answer 1

您还可以使用常量。源文件也是 unicode，因此您可以添加任何类型的常量。请记住将源代码另存为 unicode。

const
  alpha = 'α';
  beta  = 'β';
  gamma = 'γ';