TRichView.com

Posted: **Tue Nov 01, 2005 3:20 pm**

Hello,

1.
If memo (rve) is focused memo.color is clYellow.
If grid is focused memo.color is clInfoBk.
The spaces which make memo-text justify (Blocksatz) are white, but they shall have the same color as memo.color (clYellow or clInfoBk).

2.
If memo has blank lines at the end, you have in the preview (or printing) a 2. page though she is empty. I look to the end of the memo for blank lines and delete them, an user doesn't do so. How can I delete them by programm (e.g. memo.exit).

I hope someone can help me.

Jürgen

Posted: **Wed Nov 02, 2005 9:20 pm**

1. I cannot reproduce the problem with spaces. Please send me a project showing it.

2.

Code: Select all

procedure DeleteTrailingBlankLines(RVData: TCustomRVData); 
var i: Integer; 
begin 
  for i := RVData.ItemCount-1 downto 1 do 
    if RVData.IsParaStart(i) and (RVData.GetItemStyle(i)>=0) and 
      (RVData.GetItemText(i)='') then 
      RVData.DeleteItems(i,1)  
    else
      break;
end;

Call:

Code: Select all

DeleteBlankLines(RichViewEdit1.RVData); 
RichViewEdit1.ClearUndo; 
RichViewEdit1.Format;

Posted: **Thu Nov 03, 2005 10:05 am**

Hello Sergey,

1. Thank for your help.

2. Sorry. I hope you can understand my problem now.

If memo (rve) is focused memo.color is clYellow.
When I leave memo to focus grid memo.color changes to clInfoBk.

The spaces (between chars) in a memo which make memo-text justify (zum Blocksatz) are white (but they shall be clYellow (or clInfBk)).

Jürgen

Posted: **Thu Nov 03, 2005 10:50 am**

I still cannot reproduce the problem. In my tests, these spaces are not visible (transparent) if the corresponding TextStyles.BackColor = clNone, as it should be.

TRichView.com

spaces which make a memo-text justify are white,

spaces which make a memo-text justify are white,

spaces which make memo-text justify are white