Проблема с кодировкой в WM_COPYDATA

[Mr_ViK]

Всем hi^)

Стоит задача передать из программы на c++ строку в программу на Delphi. Использую SendMesssage + WM_COPYDATA.
Проблема при получении строки: кодировка китайская какая-то))

Отправляю:

void func(const char *str,...)
{
        char params[1024];
        va_list va;
        va_start(va, str);
        _vsnprintf(params,1024,str,va);
        COPYDATASTRUCT data;
        const AnsiString sTest = params;
        data.cbData = sTest.Length() + 1;
        data.lpData = sTest.c_str();
        SendMessage((void*)1574710,WM_COPYDATA,0,(LPARAM)&data);
        //Form1->Edit1->Text = sTest.c_str();
}

Получаю:

procedure TForm1.onMessgage(var Msg: TWMCopyData);
var temp:array[0..1023] of Char;
begin
  StrLCopy(temp,Msg.CopyDataStruct.lpData,Msg.CopyDataStruct.cbData);
  ShowMessage(temp);
end;

Что я не так делаю?

[Пепел Феникса]

версия Делфи?

[Mr_ViK]

Delphi XE 15, C++ Builder 6

[Пепел Феникса]

эммм, используйте AnsiChar то, вы же Ansi отправляли.

[Mr_ViK]

Спасибо, заработало)