掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Alignを変更するには？ (ID：32212)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
解決済みですが、以下でどうでしょう。 Panel1とPanel2にコンポーネントが多数載っている場合、 どんな動きになるかまでは検証していません。 TForm1 = class(TForm) Panel1: TPanel; Panel2: TPanel; protected procedure AlignControls(AControl: TControl; var Rect: TRect); override; end; procedure TForm1.AlignControls(AControl: TControl; var Rect: TRect); begin inherited AlignControls(AControl, Rect); Panel2.SetBounds(ClientWidth-Panel2.Width, 0, Panel2.Width, ClientHeight); Panel1.SetBounds(0, ClientHeight - Panel1.Height, ClientWidth-Panel2.Width, Panel1.Height); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.