Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Llamar a un procedure desde FastReport (https://www.clubdelphi.com/foros/showthread.php?t=46963)

fcios 14-08-2007 23:18:18

Llamar a un procedure desde FastReport
 
Hola, uso delphi 7 y soy nuevo con fastreport 3

En un form tengo un frxReport y un frxDBDataset
y tengo colocado en el uses miDataModule

dentro del evento Page1OnBeforePrint necesito llamar a un procedimiento que lo tengo en miDataModule

con Quick report lo llamo directamente por ejemplo dm.miprocedimiento

¿ Como lo llamo desde Fast Report ?

(en los manuales de fast report no encontre como hacerlo pero me imagino que se puede)

muchas gracias

Chris 15-08-2007 01:20:05

Dentro del objeto TrfxReport en el form o en Datamodule tienes que agregar código para el evento "OnUserFunction", te debe de quedar algo así:

Código Delphi [-]
function TForm1.myReportUserFunction(const MethodName: String;
  var Params: Variant): Variant;
begin

if CompareText(MethodName,'Page1BeforePrint') = 0 then
   Result := DM.MiFunction(Params[1]);
end;

Consulta el Developer's manual de fastreport para aprender como ingresar y manejar tus propias funciones. Esta documentación no la encontraste porque seguro leíste el manual de usuario.

fcios 15-08-2007 06:59:13

Ahora leí el manual de Developer's y lo hice funcionar, Muchas gracias


La franja horaria es GMT +2. Ahora son las 10:57:45.

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