Enviar el contenido de un TPanel a la impresora
 

Necesito enviar lo que tengo en un TPanel a la impresora directamente.
Estoy usando la siguiente forma:

with printer do
begin
begindoc;
panel1.PaintTo(Handle,x,y);
enddoc;
end;

esto funciona pero se imprime muy pequeño, es decir, un tercio del tamaño de la hoja de papel. He variado los numeros "x" e "y" pero aun asi lo envia igual.
Necesito una orientación que me diga como hacer para que ocupe toda la hoja de la impresora.