Ver Mensaje Individual
  #1  
Antiguo 28-06-2007
carrrlos carrrlos is offline
Registrado
 
Registrado: dic 2006
Posts: 9
Reputación: 0
carrrlos Va por buen camino
fromPage y Topage, TPrintDialog??

Buenas Tardes compañeros del foro,

Estoy haciendo una aplicación que permite imprimir, configurando las propiedades de la impresora mediante un TPrintDialog y la pregunta es la siguiente:

¿Como puedo emplear los valores que he asignado a las propiedades fromPage y ToPage del TPrintDialog para que al imprimir(Mediante un objeto de la clase Tprinter) me imprima sólo el rango de páginas seleccionado?

A continuación pongo el código sobre el que estoy trabajando y muchas gracias por vuestra ayuda.

Saludos.

Código Delphi [-]
 
//Anteriormente a este código he ejecutado un
//TopenDialog en el que se habran establecido
//las propiedades FromPage y ToPAge
with Printer do
begin
  Orientation := poLandscape;
  Title := 'Test print for Delphi';
  Copies := Copies;
  AssignPrn(Impresora);
  Title:='Prueba';
  Rewrite(Impresora);
  vLista := TStringList.Create;
  try
    vLista.LoadFromFile(NombreFichero);
    Writeln(Impresora, vLista.Text );
  finally
    CloseFile(Impresora);
    vLista.Free;
  end;
end;

Última edición por carrrlos fecha: 28-06-2007 a las 19:45:21.
Responder Con Cita