You are not logged in.
Pages: 1
Hello again,
first i want to thank you for taking your time on this, much appreciated.
this is a very small piece that already makes adobe reader giving the message when printing ( it is to a postscript printer , maybe that gives a clue ).
procedure TForm5.Button1Click(Sender: TObject);
var
lPdf : TPdfDocument;
lPage : TPdfPage;
begin
lPdf := TPdfDocument.Create;
try
lPdf.Info.Author := 'Tester';
lPdf.Info.CreationDate := Now;
lPdf.Info.Creator := 'Tester';
lPdf.DefaultPaperSize := psA4;
lPage := lPDF.AddPage;
lPDF.Canvas.SetFont('Helvetica',10.0,[]);
lPDF.Canvas.SetLeading(lPDF.Canvas.Page.FontSize);
lPDF.Canvas.SetLineWidth(0.1);
lPdf.Canvas.BeginText;
lPdf.Canvas.TextOut( 300, 700, 'This is some text.');
lPdf.Canvas.EndText;
lPdf.SaveToFile('c:\temp\test.pdf');
finally
lPdf.Free;
end;
end;
Regards,
Tjerk Hellekamp
Hello,
i am trying to use the synpdf package to directly build pdf documents.
I started out using Foxit reader as the default viewer and from that i got nice results and no errors.
Unfortunately i have to use Adobe reader 9 as the default viewer and document printer.
It shows and prints the document perfectly, but always with the popup saying that there are some errors in the document.
First the error popup also came when opening the document and displaying it on screen, but when i changed it to clipped text output, the message did not come again.
I have still the problem that even putting in one line of text produces an error in adobe reader 9 when printing the document.
I browsed all sources and examples and cannot seem to find a simple example of how to use synpdf directly and correctly.
Is there a simple sample pascal example in which a document is generated with some text and some line graphics ?
Thanks,
Tjerk Hellekamp
Pages: 1