doch, wird es
... kannst's gern ausprobieren
Delphi-Quellcode:
function abc: Boolean;
var
Obj: TObject;
begin
Result := False;
Obj := TObject.Create;
ShowMessage('
Obj := TObject.Create;');
try
// etwas das schiefgehen kann ...
// ...
Raise Exception.Create('
123');
// hat funktioniert:
Result := True;
ShowMessage('
Result := True;');
except
ShowMessage('
except');
end;
Obj.Free;
ShowMessage('
Obj.Free;');
end;
Nach einem Try-Except-Block wird "IMMER" weitergearbeitet.
Und selbst wenn da mal so ein großer Fehler auftritt, daß selbst Try-Except ihn nicht behandeln könnte, dann würde auch Try-Finally versagen.