Page 2 of 2

Posted: Sun Nov 12, 2006 9:38 am
by Sergey Tkachenko
This problem was easy to fix. In CRVData.pas, in TCustomRVData.SaveRTFToStream, the following code

Code: Select all

if (Level=0) and (StartItem<>EndItem) and
  IsParaStart(EndItem) and (GetItemStyle(EndItem)>=0) and 
  (Items[EndItem]='') then
      RVFWrite(Stream, '\par');
was changed to:

Code: Select all

if (Level=0)  then 
  RVFWrite(Stream, '\par');