Informes parametrizados con Crystal Report + Delphi. (Parametro = TEdit).

Para gestionar un informe parametrizado desde Delphi, previamente diseñado con Crystal Report, es necesario:

1) Disponer de un miembro de especificaciones con extensión .rpt, generado desde el propio Crystal Report.

2) Un campo TEdit que reciba el valor concreto que tomará el parámetro.

3) Un botón que , desde su evento click, ejecute el siguiente código:

md.DirxNacionalidad.ReportName:=ExtractFilePath(Application.ExeName)+'RPT\DirxNacionalidad.rpt';

md.DirxNacionalidad.ParamFields.Items[0].CurrentValue := pInforme.Text;

md.DirxNacionalidad.execute;

EXPLICACIÓN:

En el ejemplo anterior al objeto/Componente TEdit le he llamado pInforme, el miembro rpt se llama DirxNacionalidad y se encuentra en el directorio RPT, desde donde se ejecuta la aplicación.

Tal como puede verse, la primera instrucción fija en términos relativos al ejecutable del proyecto, la localización del archivo generado por Crystal Report (extensión rpt).

La segunda instrucción asigna al valor actual del parámetro de orden cero (el primero) a la propiedad Text del objeto TEdit, introducido previamente por el usuario.

Finalmente, el método execute, ejecuta el informe.