HolaPuedes utilizar el Canvas de Printer() de la siguiente manera:
if (PrintDialog1->Execute()) {
Printer()->Canvas->Font->Size=12;
Printer()->Canvas->MoveTo(10,10);
Printer()->Canvas->LineTo(20,20);
Printer()->TextOut(20,20,"HOLA");
}
El origen de coordenadas está en la esquina superior izquierda.
Así haces una línea desde el punto 10,10 hasta el 20,20 y escribes HOLA en esta última coodenada.
Espero que te sirva de ayuda.
Un saludo