[Rat]

Добрый день. Ковыряю IM VCL Component. Почти все работает. Но проблема при получении сообщений.

Сообщения принимаються следующим образом (взято из примера):

Код:

1 2 3 4 5

procedure TfrmICQ.ICQMessage(Sender: TObject; const Buddy: string;   const Message: WideString); begin   memLog.Lines.Add(Buddy + ' Said: ' + Message); end;

Так вот. в memLog добавляется всякая ерунда.

Если тормознуть прогу на memLog.Lines.Add(Buddy + ' Said: ' + Message);, то видно, что Message имеет следующий формат: #00'H'#00'i'. В мануале написано, что:

procedure SendMessage(const Buddy: string; const AMessage: WideString);
Description
Send instant message to your buddy. It support UTF8 char

Я непойму, это получается что у меня приходить UTF16 или что? И как мне преобразовать это в обычный String?

Видел это: http://www.delphisources.ru/forum/sh...eString+String в codepage подставляю 1251. На выходе из функции получается пустая строка.

Не пойму, как лечить?