簡潔な記述 (ID:7387)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ScrollBoxの命名が必ずpagecontrol1.ActivePage.TabIndex+1と一致する前提とするなら、 i:=pagecontrol1.ActivePage.TabIndex+1; Sb:=FindComponent('ScrollBox'+IntToStr(i)) as TScrollBox; ※ひょっとしたら、pagecontrol1.ActivePage.FindComponentの方が良いかも という感じでもできますね ではでは