¿Imprimir formulario COMPLETO?
Publicado por roedecker (2 intervenciones) el 06/05/2004 16:39:06
Buenas. Estoy haciendo un programa bajo Delphi 7 en el que necesito imprimir (directamente) un formulario de 800x700 con un objeto TImage y varias labels. El problema es que, en una resolución de a 1600x1200 lo imprime entero, pero a 1024x768 sólo me imprime la sección del formulario que se muestra en ese momento en pantalla.
He probado con PrintScale, y no me soluciona nada. También he probado este apaño: guardar el formulario en un wmf, y después mandar a imprimir ese archivo, pero surge el mismo problema al usar el GetFormImage. Lo que hago es simplemente:
procedure TFormPrincipal.PagImprimirClick(Sender: TObject);
begin
FormImpresion.PrintScale:=poPrintToFit;
FormImpresion.Print;
end;
¿Alguien sabe que puedo hacer para imprimirlo todo?
Gracias
He probado con PrintScale, y no me soluciona nada. También he probado este apaño: guardar el formulario en un wmf, y después mandar a imprimir ese archivo, pero surge el mismo problema al usar el GetFormImage. Lo que hago es simplemente:
procedure TFormPrincipal.PagImprimirClick(Sender: TObject);
begin
FormImpresion.PrintScale:=poPrintToFit;
FormImpresion.Print;
end;
¿Alguien sabe que puedo hacer para imprimirlo todo?
Gracias
Valora esta pregunta


0