How To: Manually print rendered pages
sun
Poland
Hi,
in previous version of fastreport (2.4x) I done printing procedure for rotated labels:
how to do it in fr 4.x?
FR.Engine.PreviewPages.DrawPage() ? how get proper DPI for bitmap?
Ok, it works now
in previous version of fastreport (2.4x) I done printing procedure for rotated labels:
i := FR.EMFPages.Count-1;
w := FR.EMFPages[i].PrnInfo.PPgw;
h := FR.EMFPages[i].PrnInfo.PPgh;
emf := TBitmap.Create;
emf.PixelFormat := pf1bit;
emf.Width := w;
emf.Height := h;
FR.EMFPages.Pages[i].Visible := True;
FR.EMFPages.Draw(i, emf.Canvas, Rect(0, 0, w, h));
if (GlobalParams['ROTATE_LABEL'].Value = 1) then Rotate1bit90(emf,1);
Printer.BeginDoc;
Printer.Canvas.Draw(0,0,emf);
Printer.EndDoc;
how to do it in fr 4.x?
FR.Engine.PreviewPages.DrawPage() ? how get proper DPI for bitmap?
Ok, it works now