PDA

Ver la Versión Completa : Llamar a un procedure desde FastReport


fcios
14-08-2007, 23:18:18
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í:


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