Problema con TPrinterWin

[jhonalone]

Bueno.
¡Un Pasito más!

El tema de los font es que no se pueden asignar de golpe, o sea .....font := .....font.
Hay que hacerlo detalladamente, así (no he probado, pero lo compila):

Código Delphi [-]
   Font.Size := Form1.Pica.Font.Size;
   Font.Family := Form1.Pica.Font.Family;
   Font.Style := Form1.Pica.Font.Style;

Sigo investigando mientras espero vuestra ayuda.
Saludos.