VCL/Additional/GridPanel - hiro_rwのvcl的な何か

Top > VCL【未作成】 > Additional > GridPanel

---

GridPanel上に置いたオブジェクトをOnResize時に自動でサイズを変えてくれる優れもの？

今まで、OnResize時に手前てやっていたのが省けるのが楽かとおもいきや
各グリッドの幅をデザイナ上から変更するのが手間。というか、パーセント指定を作った奴は馬鹿だろ！という事で各グリッドの幅をコンストラクタで記述すると楽です。以下ソース

// 基本グリッド整形
GridPanel->RowCollection->BeginUpdate();
GridPanel->RowCollection->Items[0]->SizeStyle = ssPercent;
GridPanel->RowCollection->Items[0]->Value = 10;
GridPanel->RowCollection->Items[1]->SizeStyle = ssPercent;
GridPanel->RowCollection->Items[1]->Value = 10;
GridPanel->RowCollection->EndUpdate();

ロックしている間に設定するとパーセンテージは維持できます。

デザイナでGridPanelにオブジェクトを載せたフォームを継承したフォームは作成できません。
これもコンストラクタで

TWinControl->Parent = GridPanel1;

と入れていきます。Parentで追加していくと上方の左から右へセットされていきます。

GridPanelに配置したTPanelを縦で管理したったので一度、全てのGridPanelにTPanelをセットした後、TListに縦の順番でポインタを格納→不要なTPanelは全て隠すという方法でどうにか。