将带有特殊字符的 Delphi DFM 迁移到 D2009

Question

我有许多 Delphi 表单，其中我们使用几个特殊字符 - “度”符号和“欧姆”符号。 这些字符用于保存在 DFM 文件中的标签标题，并且不会在运行时生成或修改。 回到我们第一次设计这些形式时，度数符号很容易，因为它位于 Ansi 字符集（代码 176）中，但欧姆符号需要希腊字符集才能与代码 217 一起使用。幸运的是（我们发现）我们可以使用的所有其他字符需要（字母和数字）与希腊字符集配合良好。

现在我们希望这些表单在 D2009 中看起来相同。 度数符号看起来很好，但欧姆符号显示“Ù”，因为 dfm 文本为“Caption = 'Typed in Ohms - 1234 '#217”。 我发现我可以编辑表单以输入正确的 unicode 欧姆符号 (8486)，但当然这会丢失为“？” 返回D7时。 理想情况下，我想告诉 D2009 继续使用带有形式的希腊字符集，以便 dfm 中的 #217 映射到欧姆符号。 这可能吗？ 它似乎忽略了“GREEK_CHARSET”的 Font.Charset 设置。 我发现了一种解决此问题的肮脏方法，即迭代所有组件并执行“S​​tringReplace( S, 'Ù', OhmsChar, [rfReplaceAll] )”，但这太可怕了，肯定有更好的方法吗？

谢谢， 布莱恩

Answer 1

正如 Bruce 已经提到的，您可以使用代码来给出这些值。 我只是举一个例子和一些额外的信息。

resourcestring
{$IFDEF UNICODE}
  cOhm = unicodeohm;        // replace with correct values.
  cDegree = unicodedegree;
{$ELSE}
  cOhm = ansiohm;
  cDegree = ansidegree;

我建议对可翻译文本使用资源字符串而不是 const，因为大多数翻译工具都适用于资源。

Answer 2

我发现执行此操作的最简洁方法是在代码中填充这些“特殊”标题，如有必要，您可以在其中使用 IFDEF。

Answer 3

我遇到的类似问题是通过使用 dxgettext 解决的。 我没有使用有问题的字幕，而是使用干净的 ascii（例如“输入欧姆”），然后将它们翻译成 po 文件，作为资源嵌入到 exe 中。

顺便说一句， dxgettext 是一种向应用程序添加翻译的好方法，只需很少的开销和标准格式（po /mo) 和优秀的 3p 编辑器 (poEdit)。 适用于 D7 和 D2009。