掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ポインタを設定するには? (ID:22431)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 TPanel から TMyPanel というコンポーネントを作成しました この TMyPanel を複数管理するために MyPanels: TList; を使用しています。 本来Listから使用するのに var MyPanel: ^TMyPanel; begin Mypanel := TMyPanels.Items[Num]; MyPanel.Align := alNone; MyPanel.SetBounds(0, 0, 100, 100); // 以下処理省略 end; として使用しています。 同様に、TMyPanel を作成した場合は var DummyMyPanel: TMyPanel; MyPanel: ^TMyPanel; begin MyPanel := @(TMyPanels.Create); end; として使用できません。 現在しかたなく以下のようにしています。 var DummyMyPanel: TMyPanel; MyPanel: ^TMyPanel; begin DummyMyPanel TMyPanels.Create MyPanel := @DummyMyPanel; end; 直接 MyPanel に Create したポインタを 入れることはできないのでしょうか?
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.