Ver Mensaje Individual
  #1  
Antiguo 28-07-2008
mjjj mjjj is offline
Miembro
 
Registrado: mar 2007
Posts: 652
Reputación: 18
mjjj Va por buen camino
Error de goto afuera

Hola tengo el siguieten problema.

Estoi insertando un registro en una base de dato, utilizo el componente TIBSql, el problema es que tengo un campo de tipo Date, y puede ocurrir que lo que este ingresando no sea una fecha valida.

utilizo este codigo.

Código Delphi [-]
if (stringgrid2.Cells[2,I]) <> '' then
try
ibsql2.ParamByName('fecha').asstring:=stringgrid2.cells[2,I]
except
                On E: Econverterror Do
                   Begin
                        form1.IBTransaction1.Rollback;
                        goto afuera;
                   end;
end
else
ibsql2.ParamByName('fecha').asstring:='';

el problema es que me dice que:
"goto afuera leads into or out of TRY statement"

Creo que con ese codigo se pudiese arreglar....
Que puedo hacer para arregarlo

Gracias
Responder Con Cita