Ver Mensaje Individual
  #1  
Antiguo 18-08-2004
sur-se sur-se is offline
Miembro
 
Registrado: may 2003
Posts: 212
Reputación: 21
sur-se Va por buen camino
Funciones y parámetros Fast Report

Hola, me he definido una función adicional tal como se explica en el manual de Fast Report y el problema que tengo es que no le pasa los parámetros. Detallo el código:
- En Delphi he definido la nueva clase
Código:
TfrMiFuncion = class(TfrFunctionLibrary)
y he definido los procesos correspondientes del create y del DoFunction. Esto funciona bien y la llamada se ejecuta correctamente.
- En el evento OnBeforePrint de la banda maestra he añadido el código siguiente:
Código:
begin
     Aux1:=[ModuloInformes.ARTICULOS."NCOD_EJERCICIO"];
     Aux2:=[PAGE#];
     if GenIDX='S' then GRABAR([Aux1],[Aux2]);
end;
donde Aux1, Aux2 y GenIDX son variables definidas en el diccionario de datos. El problema es que mi función GRABAR recibe dos parametros, pero al ejecutar el programa paso a paso me doy cuenta que al llegar método DoFunction (FNO:integer;p1,p2,p3:Variant; var val: Variant) que ejecuta la funcion, el valor de los parametros p1 y p2 (que son los que uso) en lugar de tener el valor correcto (para aux1 un dato de un campo y para aux2 el número de página) se recibe en p1 = '[Aux1]' y en p2='[Aux2]', es decir, lo que escriba como parámetro eso se pasa.
¿ No se pueden pasar parámetros que se calculen? ¿Como puedo hacer que funcione?
Salu2.
Responder Con Cita