一个很简单的问题，关于类的，请达人帮手，刚接手delphi，

Question

如果我在一个button里面的对一个editbox做几次的属性操作，但几个editbox都是做同一样的事情，所以，我想把这几个操作写成一个function，button.onclick
edit1.text='';
edit2.text='';
edti3.text='';现在我想写成一个function
function sys_empty(objcet)
{
   object.text='';
}下面在onclick
sys_empty('edit1');
sys_empty('edit2');
sys_empty('edit3');用delphi如何实现，刚转入delphi,
达人帮手

Answer 1

function sys_empty( ASender : TEdit)
beginif Assigned(ASender) then
    (ASender as TEdit).Text:='';end;
    

Answer 2

delphi还不支持这样的反射。只能直接传入类的实例变量程序名

Answer 3

兄弟，能给点完整一点的么？提示没定义波。刚入来，不懂呀，以前学过pascal呀.感谢呀，

Answer 4

兄弟，我是function放到别一个pas里面哦.

Answer 5

下面在onclick 
sys_empty(edit1); 
sys_empty(edit2); 
sys_empty(edit3); 

Answer 6

       zhengjie