Search found 4 matches
- Thu Aug 25, 2016 9:55 am
- Forum: ScaleRichView
- Topic: prevent page break
- Replies: 5
- Views: 21000
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. ...
- Wed Aug 24, 2016 9:37 am
- Forum: ScaleRichView
- Topic: prevent page break
- Replies: 5
- Views: 21000
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 SRich...
- Wed Aug 24, 2016 8:38 am
- Forum: ScaleRichView
- Topic: prevent page break
- Replies: 5
- Views: 21000
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(SRic...
- Tue Aug 23, 2016 1:59 pm
- Forum: ScaleRichView
- Topic: prevent page break
- Replies: 5
- Views: 21000
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 TF...