意思是GroupBox1中的第二个控件是tradiobutton类型的控件,并且被选中。
你可以看一下:
var ii: Integer;for ii := 0 to GroupBox1.ControlCount - 1 do
begin
ShowMessage(GroupBox1.Controls[ii].Name);
end;
你可以看一下:
var ii: Integer;for ii := 0 to GroupBox1.ControlCount - 1 do
begin
ShowMessage(GroupBox1.Controls[ii].Name);
end;
RadioGroup1.ItemIndex := 1;GroupBox1这是一个容器
TWinControl.Controls //这是容器上的控件(TControl)列表
或祖先,但是在内存中还是原类型,如你的radiobutton1还是trodiobutton,这样你用(groupbox1.Controls[1] as tradiobutton)就是强制类型转换,让delphi以tradiobutton类型的地址方式去读这个类,这时候
(groupbox1.Controls[1] as tradiobutton).Checked就相当于radiobutton1.checked,(其中设radibutton1是controls[1])其它的类同
或祖先,但是在内存中还是原类型,如你的radiobutton1还是trodiobutton,这样你用(groupbox1.Controls[1] as tradiobutton)就是强制类型转换,让delphi以tradiobutton类型的地址方式去读这个类,这时候
(groupbox1.Controls[1] as tradiobutton).Checked就相当于radiobutton1.checked,(其中设radibutton1是controls[1])其它的类同
tomponent是所有控件的祖先
tcontrol是可可视控件的祖先,
建议你看看相差继承的书。
Tcomponent -> TControlForm.Component
....Control//
如:
Panel.Component//你见过吗?
Panel.Control //你不会没有见过吧;
嘻嘻嘻