RadioGroup1 焦点

[wugangcn]

想判断TRadioGroup 有没有获得焦点的问题。
RadioGroup1Click名不符实，即使没有Click它，只有其ItemIndex变化，即使没有点击仍然运行，其RadioGroup1Click完全象Edit的OnChange一样。但是Edit有((Sender as TWinControl).Focused可以判断，而RadioGroup1Click如何判断是点击还是程序造成的变动。

[CACACACACA]

但是Edit有((Sender as TWinControl).Focused可以判断

同样可以 TRadioGroup(Sender).Focused 。

或许我没看明白楼主的意思。

[wugangcn]

if RadioGroup1.Focused then 无效. RadioGroup1始终无焦点

[huangheguyun]

TRadioGroup(Sender).Focused 用这个可以判断

[buding79]

我感觉你写到radioGroup事件里面，不如写到每个tRadioButton事件里面，在每个tRadioButton事件里面，判断checked是否选中，我觉得这样更准确。