Udskriv på printer via Canvas

Jeg har følgende kode:

Jeg ønsker selv at kunne definere hvad der skal skrives ud på printeren via koordinater.

printer.PrinterIndex := printer.Printers.IndexOf('Lexmark Optra T614');
printer.Copies      := 1;
printer.Orientation  := poPortrait; 
printer.Title        := 'Test udskrift 1';
printer.BeginDoc;
Printer.Canvas.TextOut(200,200,'linje1');
Printer.Canvas.TextOut(300,300,'linje2');
printer.EndDoc;

Hvordan får jeg skrevet det "Printer.Doc" som jeg har oprettet ? Skal det kædes sammen med en print dialog box ?