浏览代码

* Select proper stringbuilder depending on size of char

Michaël Van Canneyt 1 年之前
父节点
当前提交
6f25cccda9
共有 1 个文件被更改,包括 4 次插入0 次删除
  1. 4 0
      rtl/objpas/sysutils/sysstrh.inc

+ 4 - 0
rtl/objpas/sysutils/sysstrh.inc

@@ -346,7 +346,11 @@ Type
 {$undef SBUNICODE}
 
 Type
+{$IF SIZEOF(CHAR)=1}
   TStringBuilder = TAnsiStringBuilder;
+{$ELSE}
+  TStringBuilder = TUnicodeStringBuilder;
+{$ENDIF}
 
 function SafeFormat (const Fmt: AnsiString; Args: array of const; const FormatSettings: TFormatSettings): UTF8String; overload;
 function SafeFormat (const Fmt: AnsiString; Args: array of const): UTF8String; overload;