このコードで何が例外を発生させる可能性があるのでしょうか。
function CreateBibleNames: TStrings;
begin
Result := TStringList.Create;
try
Result.Add('Adam');
Result.Add('Eva');
Result.Add('Kain');
Result.Add('Abel');
except
Result.Free;
raise;
end;
end;
私は Delphi を使用しているので、おそらく一度は例外処理を使用したことがあります。上記のコードは熟練したプログラマーによって書かれたものであり、例外が冗長であるとは思いません。それでも、この概念で例外処理を使用することは、私にとって謎のままです。安全なコードのようです (end 以外は try なし)。私はこのような類似のコード スニペットを何度も見てきました。そのため、私の経験にもかかわらず、このように記述する十分な理由があり、それが必要であるとは証明されませんでした。
さらに、何かが失敗すると、例外の説明が表示されます....
ありがとう