Infinite Page

Hello,

is it possible to configure WPTools not to use pages respectively to just have one page which is infinitely long (like a memo)?

My current approach was to set the PageHeight to MaxInt, but then I have a pretty long scrollbar. The scrollbar should just react on PageTextHeight.

Any idea would be appreciated.
Regards,
Björn

Hello,

I did now set the PageHeight to the maximum and I'm trying to make a extern scollbar based on the PaintTextHeightPage.
But I can't get it to work. When the actual text height gets bigger, the max value of the scrollbar isn't big enough anymore.
I tried to convert the values, but this just made it worse.
Any idea what I do wrong?

procedure TForm1.RTFUpdateExternScrollbar(
                           Sender: TWPCustomRtfEdit;
                           ScrollBar: TScrollStyle;
                           Range, Page, Pos: Integer);
begin
  if ScrollBar=ssVertical then
  begin
      sbRTF.SetParams(RTF.TopOffset,0,
                                RTF.Memo.PaintPageTextHeight[0]);
  end;
end;


procedure TForm1.sbRTFScroll(Sender: TObject;
                           ScrollCode: TScrollCode; var ScrollPos: Integer);
begin
  RTF.TopOffset:=ScrollPos;
end;

Regards,
Björn