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
[-]
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;