Ver Mensaje Individual
  #5  
Antiguo 07-04-2006
gcaffe gcaffe is offline
Miembro
 
Registrado: oct 2004
Posts: 53
Reputación: 20
gcaffe Va por buen camino
Hola despues de mucho probar se me ocurrió la siguiente modificación y funcionó, pero no estoy satisfecho, me parece que no es necesario tener que desconectar el TADOStoreProcedure de la Base de datos, creo que es muy drástico, salvo mejor parecer. Finalmente quedo así:

Código Delphi [-]
   with DM.FacturasVER do begin
      Active := False;
      Connection := nil;             // Desconectar
      Connection := DM.DB;       // Volver a conectar
      ProcedureName := 'FacturasVER;1';
      Prepared := False;
      Parameters.Refresh;
      Parameters.FindParam('@Cliente').Value := edCliente.Value;
        Parameters.FindParam('@FechaIni').Value := FechaIni;
        Parameters.FindParam('@FechaFin').Value := FechaFin;
        Parameters.FindParam('@Estado').Value := Estado;
      Prepared := True;
   end;

Hasta la próxima y saludos
Responder Con Cita