使用case of 的问题，请看正文，谢谢！

Question

使用几个RadioButton，每个RadioButton都有不同的操作，我想使用case of 方式,如下：
case xxx of
  RadioButton1:
    begin
    end;
  RadioButton:
    begin
    end;
end;请问这样写是否正确，xxx处又如何写，谢谢

Answer 1

case xxx of
  RadioButton1:
    begin
    end;
  RadioButton:
    begin
    end;
end;
xxx处是数字 RadioButton1处也是数字

Answer 2

case (sender as TRadioButton).name of
  RadioButton1:
    begin
    end;
  RadioButton:
    begin
    end;
end;

Answer 3

枚举的才能CASE，STRING是不能用来CASE的。
按 myanwei()说的，为每个RADIOBUTTON分配唯一的TAG就可以了，然后CASE (Sender as TRadioButton).Tag