Delphi 7のFreeAndNilの代替手段は何ですか？

Question

FreeAndNilがオブジェクトを配置する理想的なアプローチかどうかは疑いがあります。

StringList1.Free; 
StringList1 := Nil; 

などのコードを使用しています。上記の行は過剰な行為ですか、それとももっと良い方法ですか？ 2つのアプローチの違いは何ですか？

Answer 1

厳密だけDestroyを呼び出すために必要なオブジェクトを処分するために、話します。ただし、参照がnilの場合、つまりオブジェクトの有効なインスタンスへのポインタが割り当てられていない場合、アクセス違反が発生するため、代わりにFreeを呼び出して、渡された参照がnilであるかどうかをチェックし、その場合は何も行いません。 FreeAndNilは、渡された参照を一時的なローカル変数に割り当て、次に渡された参照にnilを割り当て、次にFreeを呼び出してインスタンスを破棄します。 FreeAndNilとシーケンスobj.Free; obj := nil;の唯一の違いは、デストラクタが例外を発生させたとしても、最初のケースでは、渡された参照がnilになることです。

Answer 2

あなたの問題のコードは、おそらくについてFreeAndNilを知らない誰かによって書かれています。または、おそらく、FreeAndNilがRTLに追加される前に書かれたのかもしれません。あなたが参照をゼロにしたい場合は、FreeAndNilを使用することもできます。それを手書きで書くことは役に立たない。

FreeAndNilは、Freeが発生してもNilに参照を設定するという唯一の違いがあります。しかし、あなたのデストラクタは決して上げてはいけないので、私の見解ではそれほど大きな問題ではありません。

FreeAndNilと共通のトラップがあります。型指定されていないパラメータを取るので、何かを渡すことができます。たとえば、インターフェイスやレコードなどを渡すことができます。このミスを犯すと、通常、奇妙なランタイムエラーが発生します。

私は、適切な設計上の選択であるかどうかFreeAndNilを始めるつもりはありません。その話題は、他のところでいくつかの深みでカバーされています。