Any position any text

3ddark · 2013-08-14 13:27:03

Can I make this output (printout) screen with TGDIPages

sample code here

with TGDIPages.Create(self) do
try
  BeginDoc;
  ...
  ...
  ...
  ...
  EndDoc;
  ShowPreviewForm;
finally
  free;
end;

I want x=140 y=210 text = 'ABC TEST TEXT OUT' on preview framework
same

Canvas.Textout(140,210,'ABC TEST TEXT OUT');

Last edited by 3ddark (2013-08-14 13:36:19)

ab · 2013-08-14 15:56:44

Perhaps here TGDIPages is not the right component.
It focuses on multi-page report generation, with automatic layout and pagination.

Take a look at the TPdfDocumentGDI class in SynPDF.pas and its internal Canvas.
You can do whatever you want at the page level, and still use regular TCanvas methods.

3ddark · 2013-08-15 07:08:26

Is there (SynPdf.pas) a print preview before printing?
same TGDIPages or QuickReport print preview

I see SynPdf.pas
thanks ab

ab · 2013-08-15 07:41:20

No.

But you can execute the pdf (even with a temporary file name) to have a preview feature!

3ddark · 2013-08-15 09:58:13

Perhaps such a feature can be added to new updates.

I think it would be very nice.

From QuickReport is much better and convenient.

ab · 2013-08-15 11:03:06

Why not use any delphi preview component using metafiles then synpdf for the pdf export.

mORMot Open Source

#1 2013-08-14 13:27:03

Any position any text

#2 2013-08-14 15:56:44

Re: Any position any text

#3 2013-08-15 07:08:26

Re: Any position any text

#4 2013-08-15 07:41:20

Re: Any position any text

#5 2013-08-15 09:58:13

Re: Any position any text

#6 2013-08-15 11:03:06

Re: Any position any text

Board footer