瀏覽代碼

Update gegl_utils.pas

Seenkao 2 年之前
父節點
當前提交
cac7bd3bcc
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      Zengl_SRC/srcGEGL/gegl_utils.pas

+ 2 - 2
Zengl_SRC/srcGEGL/gegl_utils.pas

@@ -44,7 +44,7 @@ var
 
 {$IfDef DELPHI7_AND_DOWN}
 // Delphi 7 and down - UTF8. Rus only.
-function AnsiToUtf8(text: AnsiString): UTF8String;
+function AscToUtf8Rus(text: AnsiString): UTF8String;
 function ByteToUtf8Rus(myByte: Byte): UTF8String;
 {$EndIf}
 // Rus: переводим клавиатурные коды в русскую символику. Для других языков, надо
@@ -70,7 +70,7 @@ function get_FlagForLoadText: Boolean; {$IfDef USE_INLINE}inline;{$EndIf}
 implementation
 
 {$IfDef DELPHI7_AND_DOWN}
-function AnsiToUtf8(text: AnsiString): UTF8String;
+function AscToUtf8Rus(text: AnsiString): UTF8String;
 var
   i, len: Integer;
   n: Byte;