Unicode中chr(153)(TM SYMBOL)的等价物

Question

在早期的Delphi版本中,我可以使用

s:=chr(153);

在字符串中获取商标符号.在Delphi 2010中,它不再起作用,可能与unicode有关.将TM符号放入字符串的等效代码字符串是什么？

Answer 1

在D2010中,我可以这样做:

s := '™' + chr(8482) + #8482;  // yields 3 subsequent TM symbols

结果:™质量

这是Joel自己写的一篇好文章 - 事实上,我今天重读了它.
http://www.joelonsoftware.com/articles/Unicode.html

Answer 2

我很确定那chr(153)是"Ö"(代码页437),等等,它是"r"(EBCDIC 037).

实际上chr(153)是未定义的,除非您还指定了您正在使用的代码页.
这正是您应该使用Unicode的原因.

Wikipedia包含大多数Unicode符号的页面,并包含Unicode 代码点.

有简单的商标符号有unicode代码点U + 2122(Delphi:Chr($2122)或#$2122).
还有注册商标符号具有unicode代码点U + 00AE(Delphi:Chr($00AE)或#$00AE).

在Unicode的网站有一个图表的列表,你可以找到所有的符号,但这需要时间习惯如何找到它们(如图表的数量有点大).
简单的商标符号是字母符号的一部分.
注册商标符号是latin-1补充的一部分.

--jeroen