Hallo,
mein Code druckt unten rechts auf dem Blatt das Wort "Hallo".
Delphi-Quellcode:
uses Printers;
procedure TForm1.Button1Click(Sender: TObject);
const
Text= 'Hallo';
begin
printer.begindoc;
printer.Canvas.Font.Size:= 12;
printer.Canvas.TextOut(printer.PageWidth - printer.Canvas.TextWidth(Text),
printer.PageHeight - printer.Canvas.TextHeight(Text), Text);
printer.enddoc;
end;