Fórum Como parar um 1º processo qdo. o 2º processo causa exceção ? #179915

Olá pessoal,

Existe alguma forma de interromper um primeiro processo quando o segundo processo causa uma exceção ?

Por exemplo :

procedure processo_1;
begin
linha 1
linha 2
linha 3
processo_2; (chamei o processo_2)
linha 4 (como não permitir que as linhas de 4 à 6 sejam executadas
linha 5 caso ocorra uma exceção no processo_2 ?)
linha 6
end;

procedure processo_2;
begin
try
...
...
except
... (tratei a exceção)
end;
end;

se alguém puder me ajudar, desde já agradeço...