[guranvir]

Требуется получить текст из контрола следующего класса(имеется в виду оконный класс в смысле WinAPI) TInfuRichViewEdit.UnicodeClass Однако в описании этого сообщении стоит что unicode не поддерживается. Однако все же пошарив по инету убедился что народ как то решает сию проблему, а вот как непонятно. Проблема в том, что у меня не выводится текст из контрола, а появляется одиночный символ, который никак не связан с текстом в контроле.Как справится с проблемой? вот код, который у меня есть:

Код:

GetClassName(h,s,256);
   if s='TInfuRichViewEdit.UnicodeClass' then
    begin
   SendMessage(h, wm_gettext ,100, lparam( @s[ 1 ]));
   captionw:=WideCharToString(s);
  Form1.Memo2.Lines.Add(captionw);
    end;

S объявлена как s:array[0..256] of WideChar;