如何替换字符串中的Unicode字符？

Question

我需要用字符串中的“普通”字符替换文字UNICODE字符：

HTMLString := StringReplace(HTMLString, '??', '->', [rfReplaceAll]);

但是我不能在Delphi代码编辑器中输入这个Unicode字符，因为Delphi代码编辑器不能显示这个Unicode字符。

我可以清楚地看到上面的Unicode字符在字符串中，因为当我用CodeSite发送字符串时，我可以在CodeSite Live中看到它：

CodeSite.Send('HTMLString', HTMLString);

这是CodeSite Live的屏幕截图：

​

​

那么，如何替换字符串中的Unicode字符呢？

德尔菲: 10.1柏林

Answer 1

Delphi支持Unicode，因为V2009，只需在代码编辑器中右键单击File Format，然后选择UTF8，下面是替换unicode字符的简单示例：

procedure TForm1.FormCreate(Sender: TObject);
Var
 S: Char;
 Str: string;
begin
  S:= chr($25b6); // Or S:= chr(9654);
  Str:= S + 'Hi there' + S;
  Caption:= Str + ' ---> ' + StringReplace(Str, S, '', [rfReplaceAll]);
end;

在Delphi 2009中发现的许多新特性之一是在整个产品中注入Unicode。Delphi中的默认字符串现在是基于Unicode的字符串。由于Delphi主要是使用Delphi构建的，因此IDE、编译器、RTL和VCL都完全支持Unicode。

阅读所有文章：http://edn.embarcadero.com/article/38437