Club Delphi  
    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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-08-2004
jrp jrp is offline
Registrado
 
Registrado: ago 2004
Posts: 2
Poder: 0
jrp Va por buen camino
Crystal reports

Hola quisiera saber si crytal reports trabaja con Delphi y si es asi donde encuentro un manual actualmente lo utilizo con VB atravez de RDC ¿Esto se puede en Delphi? o si no que programa me recomiendan para generar reportes en tiempo de ejecucion con sentencias de SQL
Responder Con Cita
  #2  
Antiguo 07-08-2004
Aztaroth Aztaroth is offline
Miembro
 
Registrado: dic 2003
Ubicación: Matamoros
Posts: 52
Poder: 21
Aztaroth Va por buen camino
Si funciona muy bien, lo unico que necesitaras son los vcl para que puedas enlazar el reporte, yo lo utilizo con delphi 7.
Responder Con Cita
  #3  
Antiguo 07-08-2004
jrp jrp is offline
Registrado
 
Registrado: ago 2004
Posts: 2
Poder: 0
jrp Va por buen camino
tienes codigo de ejemplo? a otra cosa has usado subreportes si es asi podrias poner un codigo de ejemplo el VB lo hago con un for que recorre los objetos del reporte si es subreporte le asigna el contenido del recordset el delphi como es? y por ultimo que version de crystal tienes yo utilizo la 8.5 Developer
Responder Con Cita
  #4  
Antiguo 04-09-2004
Avatar de RicardoLT
RicardoLT RicardoLT is offline
Miembro
 
Registrado: ago 2004
Posts: 20
Poder: 0
RicardoLT Va por buen camino
Espero Te Sirva

YO UTILIZO DELPHI 7 Y CRYSTAL 10, PARA LO CUAL NECESITAS EL VCL QUE PROPORCIONA CRYSTAL PARA DELPHI

UN EJEMPLO DE CODIGO:

function TFRPRUEBAS.ImprimeCR10( fcReporte: string; fsNameFormula,fsFormulas: array of string; fcRepTit: string = ''; fcRepSubTit: string = ''; fcFormula: string = '' ): Boolean;
VAR
liI, liMax,liMax2: Integer;
lcFile: string;
BEGIN
lcFile := 'D:\PRUEBAS\REPORTES\' + fcReporte + '.rpt';
//REPORTE, SERVIDOR Y BASE DE DATOS
CR_IMPRIME.ReportName:= lcFile;
CR_IMPRIME.Connect.ServerName:= TRIM(EDIT1.Text);
CR_IMPRIME.Connect.DatabaseName:= TRIM(EDIT2.Text);
//PARAMETROS
CR_IMPRIME.ParamFields.Items[0].CurrentValue := 'DE PRUEBA';
CR_IMPRIME.ParamFields.Items[1].CurrentValue := UpperCase(fcReporte);
CR_IMPRIME.ParamFields.Items[2].CurrentValue := 'LA CASA DE LOS DEPORTES';
CR_IMPRIME.ParamFields.Items[3].CurrentValue := fcRepTit;
CR_IMPRIME.ParamFields.Items[4].CurrentValue := fcRepSubTit;
//FORMULA DE SELECCION
CR_IMPRIME.Selection.Formula.Clear;
CR_IMPRIME.Selection.Formula.Text:= fcFormula;
IF NOT CR_IMPRIME.Selection.Check THEN BEGIN
ShowMessage('ERROR DE SELECCION');
EXIT;
END;
//FORMULAS POR REPORTE
CR_IMPRIME.Formulas.Clear;
liMax := High(fsFormulas);
IF liMax >= 0 THEN BEGIN
LIMAX2:= LIMAX;
FOR liI := 0 TO liMax DO
IF fsNameFormula[liI]= '' THEN
LIMAX2:=LIMAX2-1;
IF liMax2 >= 0 THEN
FOR liI := 0 TO liMax2 DO
CR_IMPRIME.FormulaByName(fsNameFormula[liI]).Formula.Text:=fsFormulas[liI];
END;
CR_IMPRIME.WindowStyle.Title:= fcRepTit;
CR_IMPRIME.Execute;
CR_IMPRIME.SetFocus;
END;

Espero te sirva, mis correos para comunicacion son:
ricardo@gacse.com (messenger)
ricardolopeztrejo@mexico.com
ricardolopeztrejo@clubdelphi.zzn.com
Responder Con Cita
  #5  
Antiguo 18-11-2005
Avatar de nuk3zito
nuk3zito nuk3zito is offline
Miembro
 
Registrado: ago 2003
Ubicación: "Z" Land
Posts: 244
Poder: 21
nuk3zito Va por buen camino
Aquí va un ejemplo más sencillo utilizando los componentes TCrpe (para el reporte) y TCrpeDS (para ligar a un dataset desde delphi sin tener que ejecutar de nuevo todo dentro del Crystal Reports).

Código Delphi [-]
  try
    crpeDS1.DataSet:= mdDatos;
    Crpe1.ReportName:= FMenuPrinc.sFilesLocation+'walkaround.rpt';
    Crpe1.DiscardSavedData;
    Crpe1.Tables[0].DataPointer := CrpeDS1.DataPointer;

    for i:= 1 to DBGrid1.Columns.Count - 1 do
      Crpe1.FormulabyName('Mes' + IntToStr(i)).Formula.Text :=
        '''' + DBGrid1.Columns[i].Title.Caption + '''';
    Crpe1.WindowStyle.Title:= 'Reporte de Walkaround';
    Crpe1.Execute;
  except
    On E: Exception do
    begin
      Application.MessageBox('Ocurrió un error al generar el reporte!',
        pchar(Caption), mb_ok + mb_iconerror);
      Application.MessageBox(pchar(E.Message),
        pchar(Caption), mb_ok + mb_iconerror);
    end;
  end;

Espero que les sirva...
Saludos
__________________
Tiempo y ocasión acontecen a todos!
Responder Con Cita
  #6  
Antiguo 08-02-2006
enterleo enterleo is offline
Registrado
 
Registrado: feb 2006
Posts: 3
Poder: 0
enterleo Va por buen camino
Exclamation por favor me pueden enviar el crpds

si alguien me pudiera enviar el crpds se los agradecere mucho
mi correo es enterleo@hotmail.com

************************************
Nuestro Objetivo en la vida no es superar a los demas,
sino mas bien superarnos nosotros mismos
(B. Johnson)
Responder Con Cita
  #7  
Antiguo 11-01-2011
Avatar de Wbarrantes
Wbarrantes Wbarrantes is offline
Miembro
 
Registrado: ago 2010
Posts: 119
Poder: 14
Wbarrantes Va por buen camino
hola

de donde me saco estos componentes los instalo solo los llamos de otra unit?

donde los encuentro si tengo que bajarlos... ya he buscado pero no encuentro algo especifico,sime pueden ayudar les agradesco mucho
Responder Con Cita
  #8  
Antiguo 13-01-2014
olpo olpo is offline
Registrado
NULL
 
Registrado: sep 2013
Posts: 1
Poder: 0
olpo Va por buen camino
Tienes que instalar cualquier version de crystal report, yo trabajo la version 8.5 y me funciona bien con delphi. Tienes que instalar el componente de activeX Cristal Report Control, asi podras utilizar las funciones que te han publicado
Responder Con Cita
  #9  
Antiguo 14-09-2014
DenisDiaz DenisDiaz is offline
Miembro
 
Registrado: feb 2007
Posts: 55
Poder: 18
DenisDiaz Va por buen camino
Unhappy Archivos para configurar Cristal Report

Por favor me podrían enviar los archivos necesarios para configurar Cristal Report en Delphi 7 o en su defecto en link donde lo pueda descargar. Lo necesito con mucha urgencia y no lo encuentro.
Muchas gracias

mi correo: denisrdiaz@gmail.com
Responder Con Cita
Respuesta


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


La franja horaria es GMT +2. Ahora son las 20:24:06.


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
Copyright 1996-2007 Club Delphi