掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Freeされたか知るには? (ID:3215)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
>> PからTがFreeされているかどうかを知るにはどうするのでしょうか。 > nilかどうか確認すればいいと思いますけど。 > ただ、nilではない無効なデータが入っているとき困るので、 > Tを解放後、いちいちnilを代入しておいてもいいかもしれません。 Pしか見えない状態で、Pの参照先Tが解放されたかどうかを知ることは出来ないのでしょうか? -------Unit2----------------------------------- interface uses Forms,Classes; var B:TObject; Procedure Roulette; implementation var A:TObject; Procedure Roulette; begin if Random(100)>50 then A.Free; end; begin A:=TComponent.create(Application); B:=A; Randomize; end. -------Unit1----------------------------------- implementation uses Unit2; procedure TForm1.Button1Click(Sender: TObject); begin Roulette; if B=nil? ...//ここでBの参照元が破棄されているか知るには...? end; -----------------------------------------------
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.