Capturar error

[bbjb]

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.

 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]

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]

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]

Disculpen mi retraso pero no les he podido responder antes.

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

Gracias de nuevo.