delphi - フォームが表示されたときにフォームを自動整列する

Question

4 つのフォームがあり、form1 が () を表示するときに、他の 3 つを表示するように呼び出します。他のフォームを表示するときに、最初のフォームと自動的に整列するようにするにはどうすればよいですか?

-Form 1 shows
-Need form2 to attach it to the left of form 1
-Need form3 to attach it to the bottom of form 1
-Need form4 to attach it to the right of form 1

したがって、4 つの異なるセクションを持つ 1 つのフォームのように見えます。その理由は、中央のフォーム (フォーム 1) で openGL を実行し、他の 3 つのフォームでコントロールを実行したいからです。

Answer 1

そのような機能が本当に必要な場合TJvFormMagnetは、JVCL (JEDI Visual Component Library) のコンポーネントを使用することをお勧めします。

それ以外の場合は、WndProc メソッドを介して適切なメッセージをキャッチすることにより、MainForm が移動またはサイズ変更されるたびに、サイド フォームの ClientRect と位置を単純に計算できます。