Die Extravariable ist wohl eher Geschmackssache, aber Exit verwende ich persönlich nur nur, wenn es gar nicht anders geht, dafür aber öfter mal ein try .. finally.
Bei deinem Konstrukt kann man getrost Exit verwenden, weil der finally Block immer ausgeführt wird.
Delphi-Quellcode:
procedure SomeStuff;
begin
SomeData.Open;
try // Wenn man hier drüber weg ist, dann ...
...
if SomeThing then
Exit;
...
finally // ... wird dieser Block immer ausgeführt
SomeData.Close;
end;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)