Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-03-2020
marco3k marco3k is offline
Miembro
 
Registrado: feb 2015
Posts: 106
Poder: 12
marco3k Va por buen camino
Imprimir PDF en orden inverso

Hola foreros, buen día.
Tengo una duda respecto a como imprimir documentos pdf en orden inverso en delphi 7, es decir por ejemplo un pdf de 9 páginas seria desde la página 9 hacia la 1.

He buscado en la web y no he encontrado como imprimir en orden inverso, sólo encontre esta rutina y que funciona bien para imprimir documentos PDF en orden correlativo (de pág. 1 a pág. 9) y tambien imprime bien otros documentos como word, excel, powerpoint, txt.
Código Delphi [-]
uses printers, shellapi;
...
...
procedure TFrmImpresion.FormCreate(Sender: TObject);
begin
  cboPrinter.Items.Assign(printer.Printers);
  cboPrinter.ItemIndex := printer.PrinterIndex;
end;

procedure TFrmImpresion.PrintDocument(const documentToPrint : string);
var
  printCommand : string;
  printerInfo : string;
  Device, Driver, Port: array[0..255] of Char;
  hDeviceMode: THandle;
begin
  if Printer.PrinterIndex = cboPrinter.ItemIndex then
  begin
    printCommand := 'print';
    printerInfo := '';
  end
  else
  begin
    printCommand := 'printto';
    Printer.PrinterIndex := cboPrinter.ItemIndex;
    Printer.GetPrinter(Device, Driver, Port, hDeviceMode) ;
    printerInfo := Format('"%s" "%s" "%s"', [Device, Driver, Port]) ;
  end;
  ShellExecute(Application.Handle, PChar(printCommand), PChar(documentToPrint), PChar(printerInfo), nil, SW_HIDE) ;
end;
Lo que busco es que se pueda imprimir en orden inverso, es decir de la página 9 hacia la página 1.

Alguien me puede ayudar por favor, de antemano gracias por leer el post.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Diccionario Inverso. marcoszorrilla Noticias 8 12-05-2011 12:57:56
¿Cuál es la mejor forma de imprimir facturas de printers con delphi en orden? Master23 Impresión 1 02-01-2011 22:08:29
orden inverso del contenido de un memo Greco Varios 2 13-02-2009 03:05:19
"Word no envia la orden de imprimir de mi impresora" karekano85 Servers 0 09-12-2005 23:25:11


La franja horaria es GMT +2. Ahora son las 18:58:35.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi