怎么样,我才能减少在每个TEdit中写事件的方法???

解决方案 »

  1.   

    如果你的每个edit中事件都不相同,而且你又需要这些事件的话那就耐心下来一个个下吧。
    如果每个edit的事件都是响应同一事件那只要同时选中这些控件写一次就是了。
      

  2.   

    把每个EDIT控件中的公共部份提出来写成一个函数,再调用它,这样可以减少代码数量,加强可维护性.
    如果有几个是一样的,就把事件指到同一函数就行了
      

  3.   

    vcl的每个事件中都传入一个sender参数,就利用他
    if sender is TEdit then
    begin
      with sender as TEdit do
      begin
        case tag of  //使用tag标识各个不同的控件,当然有一组控件需要相同的处理的话可
                     //以设置他们的tag相同
                     //在case之前可以做一些公共的事情
          0:...
          1:...
          ...
        end;
      end;
    end;
      

  4.   

    写一个公用的过程,同时选择Edit后调用它
      

  5.   

    或者自定义一个同Edit相同属性的控件,然后添加你想要的代码,然后添加到form中