Re: Page break before table

Return to index

Author

Message

Sergey Tkachenko

Posted: 05/12/2003 19:45:53

The first method must work.

The second must work if you change to

RV.PageBreaksBeforeItems[GetLastTableItemNo(RV)] := True;

Format is not necessary.

I cannot reproduce the problem. Can you send me a simple project to

demonstrate it?

> Hi Sergey,

>

> In a RV document (not RVEdit) I need to make sure that a table starts on

> a new page. I have tried both of these solution:

>

> 1.

> Table.PageBreakBefore := True;

> RV.format;

>

> 2.

> function GetLastTableItemNo(RV: TRichView): Integer;

> var i: Integer;

> begin

>    Result := -1;

>    for i := RV.ItemCount-1 downto 0 do

>      if RV.GetItemStyle(i)=rvsTable then begin

>        Result := i;

>        exit;

>      end;

> end;

>

> RV.PageBreaksBeforeItems[GetLastTableItemNo(RV)];

> RV.format;

>

> None of these works! What do I do wrong?

>

> Martin

>