Показать сообщение отдельно
  #4  
Старый 21.03.2016, 15:23
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Не всё так просто, свойство Text у любого компонента объявлено как String, отсюда и передаётся только текст, без формата. Чтоб и его показать, следует задействовать поток, требуется ведь воспроизвести содержимое одного RichEdit в другом полностью (формально передаётся виртуальный файл *.rtf), со всеми финтами, и делается это примерно так
Код:
var
MemoryStream:TMemoryStream;
begin
MemoryStream:=TMemoryStream.Create;
try
   RichEdit1.Lines.SaveToStream(MemoryStream);
   MemoryStream.Seek(0, soFromBeginning);
   DM.ADOQueryRichText.Lines.LoadFromStream(MemoryStream);
finally
   MemoryStream.Free;
end;
end;
Взято из Drkb::00568

З.Ы. Под DM.ADOQueryRichText ясенперец подразумевается не поле, а DBRichEdit
Ответить с цитированием