TAction(Sender).Tag是干什么用的？在线等！！！

 我是delphi新手，这个问题不知道是什么意思！
case TAction(Sender).Tag of
    1, 2, 3, 4:      
在case..of语句中TAction(Sender).Tag是什么意思呢？

解决方案 »

  1.   

    case TAction(Sender).Tag 是元件中保留给用户的一个属性（1,2,3,4是自己定义的），你可以用它来区分同类元件的不同对象，甚至可以用它表示地址、颜色及其它什么的。
      

  2.   

    在你举例中TAction(Sender).Tag 可能代表不同动作类的编号（自己定义的）
      

  3.   

    上面的语句通过判断action.tag的值进行不同的处理。
    之前，你可以设置action1.tag：=1...action4.tag：=4,通过TAction(Sender).Tag 你就能知道得到是action1还是action4
      

  4.   

    tag可以保存自己定义的需要标识的东西吧在你举例中TAction(Sender).Tag 可能代表不同动作类的编号