Как переконвертировать строку ANSI в двухбайтовое представление (Unicode)?

@meo · Регистрация: 19.01.2014

Author24 — интернет-сервис помощи студентам

как переконвертировать Ansi-строку в двухбайтовое представление (Unicode (utf-16, вероятно)), и записать результат тоже в Ansi-строку?
пример: строка="С"
результат: #04#21
delphi 6
stringtowidechar - не работает. на выходе всё равно - "С"
нужна именно однобайтовая строка (1 байт на символ), а не "широкая строка" с символом "С"

просьба проверить, прежде чем писать стандартные "widechartomulti...", потому что не работают
желательно, с примером использования

@mss · 05.04.2015, 16:49

Delphi

var
  MyAnsiString, Result: AnsiString;
..
  MyAnsiString := 'строка';
  SetLength(Result, Length(MyAnsiString) * SizeOf(WideChar));
  CopyMemory(PAnsiChar(Result), PWideChar(WideString(MyAnsiString)), Length(Result));

@meo 4 / 4 / 0 Регистрация: 19.01.2014 Сообщений: 78
		1
	Как переконвертировать строку ANSI в двухбайтовое представление (Unicode)? 05.04.2015, 15:57. Показов 2086. Ответов 1 Метки нет (Все метки) как переконвертировать Ansi-строку в двухбайтовое представление (Unicode (utf-16, вероятно)), и записать результат тоже в Ansi-строку? пример: строка="С" результат: #04#21 delphi 6 stringtowidechar - не работает. на выходе всё равно - "С" нужна именно однобайтовая строка (1 байт на символ), а не "широкая строка" с символом "С" просьба проверить, прежде чем писать стандартные "widechartomulti...", потому что не работают желательно, с примером использования 0

	05.04.2015, 16:49

Как переконвертировать строку ANSI в двухбайтовое представление (Unicode)?

Решение