String.AnsiStringToUTF8

Syntax

function String.AnsiStringToUTF8(AnsiString: string): string

Alternative Names

Description

Performs a conversion from one string into an UTF8 encoded string, using the system ANSI code page for the AnsiString value.

The Return Value is a UTF8 encoded string.

This routines uses String.ConvertEncoding internally.

See also

Example

execute udsblock

returns(valueout varchar(2000))

as

begin

  /* 测试 means 'test' */

  valueout = 'unicode string Ç€αa 测试'; -- result: 'unicode string Ç€αa 测试'

  GUI.Showmessage(valueout);

  valueout = String.AnsiStringToUTF8('ansi to utf8 string Ç€αa 测试'); -- result: 'ansi to utf8 Ç€aa string ??'

  GUI.Showmessage(valueout);

  valueout = String.UTF8ToAnsiString('utf8 to ansi string Ç€αa 测试'); -- result: 'utf8 to ansi string Ç€aa ??'

  GUI.Showmessage(valueout);

  valueout = String.UTF8ToAnsiString('utf8 to ansi string Ç€αa 测试'); -- result: 'utf8 to ansi string Ç€aa ??'

  GUI.Showmessage(valueout);

  valueout = String.ConvertEncoding('utf8 to utf16 Ç€αa 测试', __cpUTF8, __cpUTF16); -- result: 'utf8 to utf16 Ç€αa 测试'

  GUI.Showmessage(valueout);

  /* 測試 means 'test' */

  valueout = String.ConvertEncoding('utf8 to big5 Ç€αa 測試', __cpUTF8, __cpBig5); -- result: 'utf8 to big5 C€αa 測試'

  GUI.Showmessage(valueout);

  /* 시험 means 'test' */

  valueout = String.ConvertEncoding('utf8 to XMacKorean Ç€αa 시험', __cpUTF8, __cpXMacKorean); -- result: 'utf8 to XMacKorean C?αa 시험'

  GUI.Showmessage(valueout);

  valueout = String.ConvertEncoding('XMacKorean to utf8 Ç€αa 시험', __cpXMacKorean, __cpUTF8); -- result: 'XMacKorean to utf8 C?αa 시험'  

  GUI.Showmessage(valueout);

  valueout = String.ConvertEncoding('XMacKorean to Windows1251 Ç€αa 시험', __cpXMacKorean, __cpWindows1251); -- result: 'XMacKorean to Windows1251 C??a ??'  

  GUI.Showmessage(valueout);

  valueout = String.ToEncoding('to Windows1251 Ç€αa 시험', __cpWindows1251); -- result: 'to Windows1251 C??a ??'  

  GUI.Showmessage(valueout);

  valueout = String.ToEncoding('to utf8 string Ç€αa 测试', __cpUTF8); -- result: 'to utf8 Ç€αa string 测试'

  GUI.Showmessage(valueout);

end