掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Form.Show前に動的生成したコントロールでAlign=alTopにした際のWidthが知りたい (ID:148878)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
コントロールを動的に生成するVCLフォームを作成しています。 Show前にコントロールを動的生成時、Formを親としたコントロールはAlign=alTopを設定するとWidthが即反映されるのですが、その動的に作成したコントロールを親としたコントロールはAlign=alTopを設定してもWidthにすぐには反映されないようです。 Show後には反映されています。 コントロール生成時にその幅によって変えたい処理があるためAlign=alTopで反映されるWidthを知りたいのですが上手い方法はないでしょうか? 例 procedure TForm1.FormCreate(Sender: TObject); var Panel1, Panel2: TPanel; begin // Self.ClientHeight = 600 Panel1 := TPanel.Create(Self); // Panel1.Width = 185 Panel1.Parent := Self; Panel1.Align := alTop; // Panel1.Width = 600 Panel2 := TPanel.Create(Self); // Panel2.Width = 185 Panel2.Parent := Panel1; Panel2.Align := alTop; // Panel2.Width = 185 → Show後には 598になっている end; 環境はWindows10でDelphi 10.2 Tokyoです。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.