在scrollbox1内 有20个rad

在scrollbox1内 有20个radiogroup 每个radiogroup旁都有一个bitbtn
单击bitbtn就会出现一个信息提示框（为空）

怎么实现？


for Index:=0 to scrollbox1.ControlCount do
begin
if Components[Index] is Tbitbtn then
with (Components[Index] As Tbitbtn) do
begin


后面的不会写哦，请教：