Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Проблема с widechar и string

Автор: Serious2008 22.2.2013, 22:27

Здравствуйте.
Пишу плагин для квипа, наткнулся вот на какую проблему.
Код должен добавлять к сообщению какую-нибудь строку, в моём случае aaa
Если ничего не добавлять, то он отправляет тоже что и принял. А если добавляю, то отсылает например вот что "qipradio.dll"

Код


procedure TQipPlugin.OnMsgRcvd(var Message: TPluginMessage);
var
msg : WideString;
aQipMsg: pQipMsgPlugin;
begin
aQipMsg := pQipMsgPlugin(Message.WParam);

msg := aQipMsg^.MsgText;
msg := msg+'aaa';
  Message.LParam := LongInt(PWideChar(WideString(msg)));
end;