Hi,
I am trying to draw a graphic in the upper right corner of
a DIN A4 page and create a PDF. Drawing the graphic to
the middle of the page works fine, but when I change the
coordinates to draw it into the upper right corner, it just
does not show.
When trying different coordinates, I was able to move it
a bit to the upper right corner, but when the left and top
coordinates of the graphic exceeded a certain value, the
graphic just did not show.
I tried that both with a JPG and a Metafile.
Do you have any clue what's going on?
Thanks,
Christian
PS:
This is the code I used for my tests:
procedure TPDFWriter.DrawLogo;
var
R: TRect;
Meta: TMetaFile;
begin
R.Left := 8500;
R.Top := 311;
R.Bottom := 1302;
R.Right := 10335;
Meta := TMetaFile.Create;
try
Meta.LoadFromFile('C:\programmierung\reportprinter\Logo.wmf');
FPDFPrinter.Canvas.StretchDraw(R, Meta);
finally
Meta.Free;
end;
end;