获得Tab Order中下一个控件,FindNextControl怎么用

Question

在一个GroupBox中有五个ComboBox,只有第一个ComboBox 的Enabled=True,其它的都是False,在ComboBox中OnChange中怎么获得下一个ComboBox控件,
FindNextControl只能获得能获得焦点的控件

Answer 1

var
i,j:integer;begin
j:=TComboBox(Sender).TabOrder;
for i:=0 to GroupBox1.ControlCount-1 do
begin
  if GroupBox1.Controls[i] is TComboBox then
  begin
    if TComboBox(GroupBox1.Controls[i]).TabOrder=j+1 then
    ShowMessage(GroupBox1.Controls[i].Name);
  end;
end;