Народ помогите не могу разобраться как менять кодировку в IdSyslogServer в Delphi.
Написал тестовый syslogsever сервер используя компоненты IdSyslogServer и IdSysLogMessage.
Данный сервер получает сообщения от клиента в латинице нормально, но если посылается кириллица то сервер получает кракозябры.
Вот код получения сообщения.
Код:
procedure TForm1.IdSyslogServer1Syslog(Sender: TObject;
ASysLogMessage: TIdSysLogMessage; ABinding: TIdSocketHandle);
begin
IdSysLogMessage1 := ASysLogMessage;
Memo1.Lines.Add ('-----------------------------------');
Memo1.Lines.Add ( IdSysLogMessage1.Msg.Text );
end;
Подскажите что поменять чтобы кириллица нормально воспринималась?