名前以外でコントロールのタイプを知るには?

解決


慎太郎  2016-07-17 00:11:26  No: 48235  IP: 192.*.*.*

スクロールボックス内の、GroupBoxとPanelが混在しています。
そのGroupBoxとPanelの中の、コントロール?数を知りたいのです。

で、Controlで入ってくるので、Nameをたよりに処理を分けたのですが、これは簡略化か?Nameの不確かさをなんとかできませんでしょうか?

    if Pos('GroupBox', SubControl.Name)<>0 then
      aCount:= (aControl as TGroupBox).ControlCount
    else if Pos('Panel', SubControl.Name)<>0 then
      aCount:= (aControl as TPanel).ControlCount;

編集 削除
通りすがり  2016-07-17 00:13:58  No: 48236  IP: 192.*.*.*

is演算子でどうぞ
http://docwiki.embarcadero.com/RADStudio/Berlin/ja/%E3%82%AF%E3%83%A9%E3%82%B9%E5%8F%82%E7%85%A7#is_.E6.BC.94.E7.AE.97.E5.AD.90

編集 削除
慎太郎  2016-07-17 00:32:51  No: 48237  IP: 192.*.*.*

即時解決です!
ありがとうございました

編集 削除