Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-09-2010
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
Casimiro, quizás sea un error, o quizás me olvido de algo, pero, ¿el crear el objeto no debería estar fuera del try?
Código Delphi [-]
var
  SP:TIBCStoredProc;
begin
  SP := TIBCStoredProc.Create( Nil );
  try
    SP.StoredProcName := 'SP_LOGO_UPD';
    SP.Prepare;
    SP.ParamByName( 'IMG_RPTFINAL' ).LoadFromFile( sPICT, ftBlob );
    Data.IBCTran.StartTransaction;
    SP.ExecProc;
    Data.IBCTran.Commit;
  finally
    SP.Free;   //   <-----
  end;
end;

La razón es que si hay un error al crear ese objeto, en tu código iría al finally a destruirlo y muy posiblemente dará otra excepción porque no se pudo destruir (al no estar totalmente creado) ¿no?
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #2  
Antiguo 25-09-2010
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is online now
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.070
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Pues sí, por lógica, si se va a crear un objeto, será conveniente hacerlo fuera del try .. finally. Tienes razón.
Responder Con Cita
  #3  
Antiguo 28-09-2010
mcs mcs is offline
Miembro
 
Registrado: may 2007
Ubicación: Girona
Posts: 229
Poder: 18
mcs Va por buen camino
Cita:
Empezado por Lepe Ver Mensaje
Casimiro, quizás sea un error, o quizás me olvido de algo, pero, ¿el crear el objeto no debería estar fuera del try?
Código Delphi [-]var SP:TIBCStoredProc; begin SP := TIBCStoredProc.Create( Nil ); try SP.StoredProcName := 'SP_LOGO_UPD'; SP.Prepare; SP.ParamByName( 'IMG_RPTFINAL' ).LoadFromFile( sPICT, ftBlob ); Data.IBCTran.StartTransaction; SP.ExecProc; Data.IBCTran.Commit; finally SP.Free; // <----- end; end;


La razón es que si hay un error al crear ese objeto, en tu código iría al finally a destruirlo y muy posiblemente dará otra excepción porque no se pudo destruir (al no estar totalmente creado) ¿no?
Aquí no daría error, ya que la creación del objecto SP es anterior al bloque try...finally.
Responder Con Cita
  #4  
Antiguo 29-09-2010
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 21
Delfino Va por buen camino
Tengo un PDF muy explicativo pero no me deja subirlo. Pero yo con Delphi XE he probado conectarme a Firebird y va de lujo. Para la prueba utilce un TSimpleDataset informando sus propiedades Connecion y Dataset. Luego el TSimpleDataset puede ser sustuido por la dupla ClientDataset y DatasetProvider..
__________________
¿Microsoft? No, gracias..

Última edición por Delfino fecha: 29-09-2010 a las 12:47:33.
Responder Con Cita
  #5  
Antiguo 30-09-2010
waly2k1 waly2k1 is offline
Miembro
 
Registrado: dic 2006
Ubicación: El país de las maravillas(Argentina)
Posts: 251
Poder: 18
waly2k1 Va por buen camino
Pdf...

Si me interesa mucho, mi correo hotmail es el mismo del nick
del club, nose si esta permitido o no, pero podrias enviarmelo por favor
ya despues preguntemos como subirlo para compartirlo con todos, yo nose
hacerlo, tampoco el tamaño maximo permitido.

Bueno, desde ya muchas gracias!!!
Walter
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
¿''?reportmanager y delphi 2010 VCL con firebird 2.1 UTF8 JXJ Varios 0 19-08-2010 19:22:03
Delphi 2010 - Firebird o es tiempo de cambiar? jourdan Conexión con bases de datos 10 04-08-2010 00:43:50
Firebird, Mysql y Delphi 2010 tec Varios 3 16-04-2010 15:34:51
Consejos para Delphi 2007 Win32 sysmar Varios 6 08-03-2008 06:57:51
Consejos para empezar con firebird seoane Firebird e Interbase 21 22-03-2007 05:14:33


La franja horaria es GMT +2. Ahora son las 11:38:44.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi