Search found 4 matches

by MrQuestion
Thu Aug 25, 2016 9:55 am
Forum: ScaleRichView
Topic: prevent page break
Replies: 5
Views: 25628

Huhu, i have found a smaller Answer to my Problem: if SRichViewEdit1.PageCount = 1 then begin exit; end; // SRichViewEdit1.RichViewEdit.Undo; This helps very much, because there are no problems with deleting Content by inserting an Item between (or before) other Items that will generate a new Page ...
by MrQuestion
Wed Aug 24, 2016 9:37 am
Forum: ScaleRichView
Topic: prevent page break
Replies: 5
Views: 25628

var PageCount: Integer; begin if SRichViewEdit1.PageCount = 1 then exit; SRichViewEdit1.CanUpdate := False; while SRichViewEdit1.PageCount > 1 do begin PageCount := SRichViewEdit1.PageCount; SRichViewEdit1.DeletePage(SRichViewEdit1.PageCount); if PageCount = SRichViewEdit1.PageCount then with ...
by MrQuestion
Wed Aug 24, 2016 8:38 am
Forum: ScaleRichView
Topic: prevent page break
Replies: 5
Views: 25628

Re: prevent page break

procedure TFInsertControls.SRichViewEdit1PaintPage(Sender: TObject; PageNo: Integer; PageRect, R: TRect; Canvas: TCanvas; Prepaint, Printing: Boolean); var i, i2 : Integer; begin if SRichViewEdit1.PageCount > 1 then begin SRichViewEdit1.GetPageStartItemNo(2, i, i2); if SRichViewEdit1.GetPageNo ...
by MrQuestion
Tue Aug 23, 2016 1:59 pm
Forum: ScaleRichView
Topic: prevent page break
Replies: 5
Views: 25628

prevent page break

Moin moin, all i want to know is, how can i prevent the User to add a new Page on my Richview? I tried so many things out... Also the Forum is full of threads how it is possible to add a page break, but i couldnt find any of how to prevent of page break... my last try ends up like this: procedure ...