Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Capturar error (https://www.clubdelphi.com/foros/showthread.php?t=20128)

bbjb 06-04-2005 18:38:27

Capturar error
 
Hola,



Estoy haciendo un bucle donde intento capturar si se produce algún error en algún momento para que no detener la ejecución del programa.

Código:

try
    for i:=0 to Tabla.FieldCount-1 do begin
        If Winword.WordBasic.EditBookmark(Tabla.Fields[i].name,0,0,0,1) then
          Winword.WordBasic.Insert(Tabla.Fields[i].value);
    end;

  except
    on EoleException do

 end;

En el momento en que se produce el error del tipo indicado (EOleException) se detiene el bluque y sale del procemiento.
Yo querría continuar con el mismo pero no consigo obtener ese resultado.

¿Es ese el funcionamiento que debe producirse en este caso?

jachguate 06-04-2005 19:09:28

Si "continuar con el procedimiento" para vos significa continuar con el ciclo, has ubicado el bloque try/except de manera inadecuada.

Debiera ser algo como:

Código Delphi [-]
  for i := 0 to 1000
    try
      HacerAlgo;
    except
      on EOleException do ;
    end;

si no es eso, por favor explicate mejor.

Hasta luego.

;)

MasterXP 07-04-2005 04:30:57

Ademas, puedes encerrar las sentencias entre la clasula Finally (Try/Fynally) para obligar la ejecucion del codigo. Aunque hay que mencionar que en esta parte tambien puede ocurrir un error.

bbjb 12-04-2005 19:19:46

Disculpen mi retraso pero no les he podido responder antes.

Muchas gracias a ambos, su consejo me ha resuelto el problema.

Gracias de nuevo.


La franja horaria es GMT +2. Ahora son las 23:51:08.

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