Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Componente PDF (https://www.clubdelphi.com/foros/showthread.php?t=57395)

tcp_ip_es 13-06-2008 12:29:40

Componente PDF
 
Me podríais decir si existe algún componente para exportación de datos (dataset) a PDF , gratuito claro :D


Muchas gracias de antemano.

Saludos, Tony

P.D. He estado buscando en los foros pero al ser la palabra "pdf" no me encuentra nada ya que es muy corta.
P.D. Se la existencia de programas que se instalan como impresoras pdf, pero no quiero eso.

Casimiro Notevi 13-06-2008 12:40:24

¿Y entonces qué quiéres exactamente?

tcp_ip_es 13-06-2008 12:45:27

Pues como bien digo en el anterior post lo que quiero es un componente que exporte datos de un dataset(TQuery o TTable) a pdf....:)

lacovera 13-06-2008 12:58:35

y porque no lo haces con el Rave? te creas el reporte cogiendo los datos de donde tu quieras y t lo guarda en pdf

tcp_ip_es 13-06-2008 13:02:45

utilizo Delphi 5 no tiene incluido rave report, tengo Qreport, pero preferiría si existiese un componente (al igual que existe de excel) que exporte directamente el Dataset a Pdf. Si no es asi pues nada ;)

marcoszorrilla 13-06-2008 13:35:47

Puedes utilizar CutePdfWriter, en realidad es un controlador de impresora y te aparecerá una vez instalado en la lista de impresoras, cualquier documento que imprimas con él te lo transforma automáticamente a PDF.


Yo para buscar una impresora determinada me he construido esta función:

Código Delphi [-]
Function GetImpresora(Impre:String):Integer;
Var
nCont:Integer;
lSearch:Boolean;
cNewLIne:String;
begin
lSearch:=False;
cNewLine:=Chr(10)+Chr(13);

  For nCont:=0 to Printer.Printers.Count - 1 do
  //buscamos la impresora en la lista del sistema
  begin

    if Pos(impre, Printer.Printers[nCont]) <> 0 then
    begin
    lSearch:=True;
    Result:=nCont;
    Break;
    end;

  end;

  if lSearch = False then
  begin
  nCont:=-1;
  Result:=nCont;
  ShowMessage('Impresora no encontrada:'+cNewLine+Impre+cNewLine+'Se utilizará la predefinida.');
  end;
          
end;



Un Saludo.

Héctor Randolph 13-06-2008 16:38:18

Hola tcp_ip_es

Puedes descargar los componentes PowerPDF (ya están obsoletos pero funcionan bien), son gratuitos y puedes generar documentos PDF desde Delphi.

Este es un ejemplo en donde se utiliza un DataSet:

http://www.est.hi-ho.ne.jp/takeshi_k.../DBExample.pdf

En esta página puedes descargarlos:

http://www.est.hi-ho.ne.jp/takeshi_kanno/powerpdf/

Saludos

tcp_ip_es 16-06-2008 07:16:33

Mucha gracias a todos, lo que quería era lo que ha comentado Hector, aunque la idea de Marcos de pillar la impresora por defecto me ha molado tambien. Lo dicho muchas gracias..... Saludos, Tony


La franja horaria es GMT +2. Ahora son las 15:38:50.

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