[Speech]

Собственно возможно ли сделать чтобы RichEdit в делфи 7 поддерживал юникод? Иногда есть скопированный текст с веб-странички и при вставке отображаются вопросительные знаки.

[lmikle]

Посмотри на RichView, кажется у них была редакция, поддерживающая юникод под Д7. Нативный компонент такого не может.

ЗЫ. Если действительно нужен юникод, то проще перейти на нужную версию Дельфей.
ЗЗЫ. Да, еще были такие компоненты TNTControls, они с поддержкой юникода, но не уверен, что у них есть RichEdit, но Memo у них точно есть.
ЗЗЗЫ. Есть еще такая штука, SynEdit, у него тоже есть редакция с поддержкой юникода. Все это надо смотреть с учетом задачи.

[NumLock]

а в чем проблема чуточку руками кода написать?)

Код:

var
  f: THandle;
  buf: array [0..$ffff] of Byte;
  dummy: Cardinal;
begin
  f:=CreateFile('Unit1.txt', GENERIC_READ, 0, nil, OPEN_EXISTING, 0, 0);
  try
    if not ReadFile(f, buf, $fffe, dummy, nil) then raise Exception.Create('!ReadFile');
    if dummy<2 then raise Exception.Create('!null');
    buf[dummy]:=$00;
    buf[dummy+1]:=$00;
    if (buf[0]<>$ff) or (buf[1]<>$fe) then raise Exception.Create('!Oops');
    SendMessageW(RichEdit1.Handle, WM_SETTEXT, 0, Integer(PChar(@buf[2])));
  finally
    CloseHandle(f);
  end;
end;

http://zalil.ru/34890307

[Speech]

lmikle, дело в том что проект написан в Delphi 7. Я знаю что последующие версии поддерживают юникод, потому и уточнил в какой версии проект у меня.

NumLock спасибо Я кстати также делал, только вручную и через блокнот ))) Но надоело это делать и решил спросить о решении проблемы с юникодом.

[NumLock]

я не совсем понял, что ты делал также, только вручную
я к тому, что и в Delphi 7 с RichEdit (и пр.) можно нормально работать с Unicode через SendMessageW.