Показать сообщение отдельно
  #3  
Старый 07.10.2013, 16:47
Аватар для SCrat.ORS
SCrat.ORS SCrat.ORS вне форума
Активный
 
Регистрация: 20.02.2007
Адрес: Мой адрес не дом и не улица, мой адрес 0x7С00
Сообщения: 208
Версия Delphi: 2006
Репутация: 884
По умолчанию

Я ожидал такого ответа. У TMemoryStream нет понятия .DataString, следовательно как строки передать в RxRichEdit? Загрузка через LoadFromStream - Не помогает. Ничего не загружается вообще. И проблема вовсе даже не в Юникоде, т.к. PlainText отображается нормально.

В качестве примера - вот исходник и ехе'шки собранные на D2006 и D2010.
Попробуйте загрузить rtf файл.
test_rxrichedit.zip
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
s:TstringStream;
ms:TMemoryStream;
I:Integer;
SB:Byte;
begin
if opendialog1.Execute then begin
S:=TStringStream.Create('');
ms:=TMemoryStream.Create;
MS.LoadFromFile(opendialog1.FileName);
for I := 0 to MS.Size do begin
MS.Position:=I;
MS.Read(SB,1);
S.Write(SB,1);
end;
RxRichEdit1.Text:=S.DataString;
S.Free;
MS.Free;
end;
end;
У D2006 - Нормально загружается, а D2010 - PlainText получается.
Думал может проблема в компоненте, но нет, они абсолютно идентичны.
__________________
Програмистами не рождаются, ими становятся!
Ответить с цитированием