delphi - tag - ¿Las declaraciones en el bloque Finalmente todavía se ejecutan en este fragmento de código?

qué es el fragmento del contenedor en google tag manager

Question

¿Finalmente se ejecutará el bloqueo? si paso la salida; ?

procedure someProc;
begin
Try
Exit;
finally
do_something;
end;
end;

Answer 1

En aras de la integridad, finalmente el bloque no se ejecutará si el proceso o el subproceso que ejecuta el bloque try..finally finaliza con TerminateProcess / TerminateThread.

Por ejemplo, finalmente el bloque no se ejecutará en el código siguiente.

o := TObject.Create;
try
TerminateThread(GetCurrentThread, 0);
finally
o.Free;
end;

Answer 2

La cláusula finally siempre se ejecutará, a menos que el subproceso en ejecución ingrese en un bucle que no termina, se bloquee indefinidamente o se termine de manera anormal, mientras se ejecuta la cláusula try.

La documentation pertinente establece (énfasis mío):

La sintaxis de un intento ... finalmente es una declaración

try
statementList1
finally
statementList2
end 

donde cada lista de instrucciones es una secuencia de instrucciones delimitadas por punto y coma.

La sentencia try ... finally ejecuta las sentencias en statementList1 (la cláusula try). Si statementList1 finaliza sin generar excepciones, se ejecuta statementList2 (la cláusula finally). Si se genera una excepción durante la ejecución de statementList1, el control se transfiere a statementList2; Una vez que statementList2 termina de ejecutarse, la excepción se vuelve a elevar. Si una llamada al procedimiento Salir, Interrumpir o Continuar hace que el control salga de statementList1, se ejecuta automáticamente statementList2. Por lo tanto, la cláusula finally siempre se ejecuta, independientemente de cómo termine la cláusula try.

Answer 3

Sí, finally bloques siempre se ejecutan, incluso si se llama Exit algún lugar. No valdrían mucho si no siempre fueran ejecutados.

Answer 4

Una aplicación de prueba rápida podría haber respondido esta pregunta muy rápidamente.

program TestFinally;
{$APPTYPE CONSOLE}
uses
SysUtils;
begin
try
WriteLn(''Before exiting'');
Exit;
finally
WriteLine(''In finally. If you see this, it was written after "Exit" was called'');
ReadLn;
end;
end.