delphi - 拉撒路。相当于 Unicode 符号的 Chr()

Question

freepascal中有没有函数可以通过代码显示Unicode符号(例如U+1D15E)？不幸的是 Chr() 仅适用于 ANSI 符号(代码小于 127)。
我想使用自定义符号字体中的符号，但直接将它们放入源代码中非常不方便(它们在 Lazarus 中显示为 ? 或其他内容，因为它们在系统字体中不存在)。

Answer 1

看看this page 。我假设 Freepascal 要么使用 UTF-16，其中它成为两个 WideChar 的代理对(见表)，要么使用 UTF-8，其中它成为字节值序列(再次见表)。

UTF-8:

const
  HalfNoteString = UTF8String(#$F0#$9D#$85#$9E);

UTF-16:

const
  HalfNoteString = UnicodeString(#$D834#$DD5E);

字符串类型的名称可能有所不同，因为我不太了解 FreePascal。也许 AnsiString 和 WideString。