子フォームのタブをメインフォームにマージする

Question

メインフォームにページコントロールがあり、子フォームにページコントロールがあります。 ドッキング機能を使用してメインフォーム内に子フォームを配置します。

私はMDIスタイルに

を使用していない今、両方のフォームは、ページのコントロールのタブを持っていると私は、メインフォームページのコントロールに子フォーム タブをマージする必要があり、それを行うための最善の方法は何ですか？

Answer 1

これは、あなたのニーズに合っているかどうかにかかわらず、かなり単純なアプローチです。あなたがマージする必要がそれぞれの子のタブページの場合

：

• はコントロールで以上の子 タブ

• 反復に対応するメインフォームページ コントロール内のタブを作成します。 子タブをクリックして親 のプロパティをタブページに設定する

他のコントロールの子であるコントロールを扱う必要はありません。例えばあなたの子タブにグループボックスがある場合、その親を変更すると、とその中のすべてのコントロールが新しい親にとなります。

いつでもタブを「解除」する必要がある場合は、コントロールがどこから来たのかを把握するためのメカニズムを工夫する必要があります。親を必要に応じて復元できます。

それはalClientに設定合わせ財産だとあなたは、子のタブでTPanelを置くことができ、物事が少し容易にするために。パネルのすべてのコントロールをそのパネルのタブに置き、マージ/アンマージする必要がある場合は、パネルコントロールの親だけを設定する必要があります。

Answer 2

ページコントロール上の複数のタブを処理する最も簡単で最善の方法は、通常フレームを使用することです。各タブの内容を取り出し、各タブの個々のフレームに取り込みます。共有コンポーネント、状態、コードをデータモジュールに移動します。次に、これらのフレームをページコントロールのタブシートに配置します。

Answer 3

私はちょうど

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    while Form2.PageControl1.PageCount > 0 do 
    Form2.PageControl1.Pages[0].PageControl := PageControl1; 
end; 

を試してみましたが、それがうまく働きました。明白な何かを見逃しているのですか、なぜ誰もがそのような洗練されたソリューションを提供していますか？ :-)