Неправильно отображаются русские буквы

[Merano]

Проблема заключается в том, что когда передаю раннее заготовленный текст другой программе:

...
for i:=1 to Length(text) do
 begin
  SendMessage(Handle, WM_CHAR, Ord(text[i]), 0);
 end;
...

русские буквы при этом неправильно отображаются. Проблема "решается" тем, что при переключении раскладки клавиатуры на русский язык - все верно вводится.
Как программно перекодировать русские буквы так, чтобы они отображались правильно?

[FaTaL]

Передавай русские символы в формате UNICODE (WIDECHAR)

[Merano]

FaTaL, спасибо

Тему можно считать закрытой.