Ver Mensaje Individual
  #2  
Antiguo 15-07-2010
Loviedo Loviedo is offline
Miembro
 
Registrado: dic 2004
Posts: 214
Reputación: 0
Loviedo cantidad desconocida en este momento
Código Delphi [-]
RvProject1.open;
RvProject1.SelectReport('Report1',true);
RvProject1.SetParam('nombreparametro,valor); // valor tipo string;
RvProject1.Execute;
RvProject1.close;

// En el report1 de rave se asigna 'nombreparametro' al Datafield de un Datatext.

// Para capturar y modificar el 'nombreparametro' en su caso, 
// en el evento DataText1.OnGetText

function DataText1_OnGetText(Self: TRaveDataText; var Value: string);
var
icount3: integer;
incremento3: string;
begin
iCount3 := StrToInt(RaveProject.GetParam ('nombreparametro'));
incremento3 := Inttostr(icount3+1);
RaveProject.SetParam ('nombreparametro', incremento3);
end OnGetText;

saludos.
Responder Con Cita