初学者请教delphi简单问题

来源：百度知道 编辑：UC知道 时间：2024/05/31 05:33:05
想做一个函数,这个函数接收1个对象参数
比如:传 image1 给它,它就实现 image1.top:=0;
传 edit1 给它,它就实现 edit1.top:=0;
怎么实现呢?
可以做一个通用的吗?
传按钮就操作按钮,传EDIT就操作edit

哦。这个好做。！

你得先知道你传的控件进去他是那个类的。
你可以先拉一个控件到空品上去。你看他是那一个类。然后替换一下就行了如下面的函数！
function sdfas(x:TButton):Boolean;
begin
x.Top := 0;
Result := True ;
end;

你现在就可以传一个按纽了
如果要传image1进去
就是Image1: TImage;

function sdfas(x:TImage):Boolean;
begin
x.Top := 0;
Result := True ;
end;

别人类似！

上面的TImage 是图片控件的类名。TButton是按钮的类名
你想知那个控件的类名。你就拉一个到窗体上。然后看他的定义就行了！

这个是通用的了
function sdf(sdfsd:TWinControl):Boolean;
begin
sdfsd.Top := 0;
Result := True;
end;

兄弟伙。看到我打了这么多字。你就多给50分行吗？
@_@