Ik gebruik Lazarus 0.9.28-2 onder Ubuntu 10.04 en ik wil een tekst uitprinten die zo ver mogelijk in de linker bovenhoek moet komen.
De onderstaande code heb ik geprobeerd:
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
if PrintDialog1.Execute then
begin
Printer.BeginDoc;
Printer.Canvas.TextOut(0,0,'Place any text here');
Printer.EndDoc;
end;
end;
Maar de tekst komt op 2 cm onder de bovenrand van het papier. Ik gebruik een Canon ip4000 printer. Ik heb ook een PDF printer geprobeerd maar daar komt de tekst ook 2 cm onder de bovenrand.
Weet iemand hoe ik de bovenmarge kan instellen zodat de tekst vlak bij de rand komt?
Bookmarks