メモリの解放(?)の要不要に関して。 (ID:39160)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

変数自体の解放は必要無いです。
Delphiが勝手にやってくれると思って良いと思います。

また、FindWindowの返り値は解放する必要ないです。

---

他の場合では、変数自体の解放は必要なくても、その変数が指し示す何かが、関数内で確保されたとするなら、それの解放は必要となる場合もあります。

開発環境のバージョンによると思うんですが、例えば、エディタで、CTRL押しながらFindWindowをクリックして、ソースを辿ります。
で、その関数のが何をしているのか確認するのが安全かと思います。
function test: integer;
begin
    Result:= integer(TStringList.Create);
end;
こういうのは滅多に無いと思うんですが無いわけでは有りません。
確認しない事にはわかりません。

ちなみに、FindWindowはAPIなので、ソースを辿っても中身はありません。

こういう場合は MSDNに精通するか FindWindowにカーソルを合わせて、F1キーを押してヘルプを読むしか無いです。
初めて使うAPI関数などの場合は、このように仕様を調べたほうが良いでしょう。

開放が必要な場合は、ヘルプの下のほうに関連するAPI関数の一覧があって、開放するための関数が含まれているはずなので、その関数名のリンクを辿って読み進める事により、開放の必要性を予想できるわけです。

例
var
  dc:hdc; //longword
begin
  dc:=GetDC(Handle);
  ReleaseDC(Handle,dc);  //GetDCとセットでAPIのヘルプに書いてある
end;

ただし、解放関数があっても、用途によっては解放してはならない場合や、タイミングが指定されている場合もあります。

とはいえ、変数である dc 自体を開放しているわけではないので、dc は開放されていません。
開放しているのは dc が示していた デバイスコンテキストのハンドルで、変数 dc ではないのです。
なので、dc自体の開放は必要ありません。

あえて変数の確保と解放をやろうとすると、以下のようになります。
var
  dc: pLongword;
begin
  GetMem(dc,SizeOf(Longword));
  dc^:=GetDC(Handle);
  ReleaseDC(Handle,dc);
  FreeMem(dc,SizeOf(Longword));
end;

また、オブジェクトのインスタンスも、どこかしらで解放が必要です。
忘れるとメモリーリークになります。
（TComponentを継承した CreateでOwnerを指定するオブジェクトはOwnerがDestroyCompomentsというメソッドを持っていてデストラクタで勝手に呼び出して解放しくれますが、明示的に解放しても問題は有りません。）

・オブジェクトの解放の例
function test: TObject;
begin
  Result:= TStringList.Create;
end;

var
 s: TObject;
begin
 s:= test;
 s.Free; //s が 指し示すオブジェクトを解放。
end;

変数 s 自体は解放の必要が無いので解放していません。

他にも色々有りますが、今回は関係ないので書かないでおきます。

シンプルな質問のはずなのに、回答しようとすると、いろいろあって大変ですね。

←解決時は質問者本人がここをチェックしてください。

戻る