掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
タブに貼り付けたクラスの破棄は？ (ID：34470)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
よろしくお願いします。環境はWindowsXP sp3 Delphi 6 Personalです。 ただいま、下記のママんさんが後の方に書かれたタブブラウザを見本にタブブラウザを作成しています。 https://www.petitmonte.com/bbs/answers?question_id=4078 動的に作成するタブページのクラスを TIETabSheet = class(TTabSheet)の constructor TIETabSheet.Create(AOwner: TComponent); で作成されています。 質問はこのタブを削除するとき変数に代入して破棄されているようです。 //タブ削除 destructor TIETabSheet.Destroy;があるので procedure TForm1.ClosePage(Index: Integer); var IETab:TIETabSheet; begin if Index<0 then exit; IETab := TIETabSheet(PCBrowser.Pages[Index]); IETab.Free; end; 質問：これを次のようにしても見た目は削除破棄するようですが問題はないのでしょうか。 //タブ削除 procedure TForm1.ClosePage(Index: Integer); //var //IETab:TIETabSheet; begin //if Index<0 then exit; //IETab := TIETabSheet(PCBrowser.Pages[Index]); //IETab.Free; TIETabSheet(PCBrowser.Pages[Index]).Free; end; よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.