在我的Form有很多TEdit.我如果些他们的OnChange事件的话,要写很多。。。。。。

21stboy 2003-12-06 01:53:47
怎么样,我才能减少在每个TEdit中写事件的方法???
...全文
93 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
yplin 2003-12-06
  • 打赏
  • 举报
回复
可用的方法上面已经都列出来了,自己选吧
konhon 2003-12-06
  • 打赏
  • 举报
回复
楼上的方法很多呀,自己挑选吧。
wave_f 2003-12-06
  • 打赏
  • 举报
回复
或者自定义一个同Edit相同属性的控件,然后添加你想要的代码,然后添加到form中
wave_f 2003-12-06
  • 打赏
  • 举报
回复
写一个公用的过程,同时选择Edit后调用它
ikumei 2003-12-06
  • 打赏
  • 举报
回复
别忘了把所有控件的事件连接同一个事件处理器中
我差点忘了
ikumei 2003-12-06
  • 打赏
  • 举报
回复
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;
liushiboy 2003-12-06
  • 打赏
  • 举报
回复
把每个EDIT控件中的公共部份提出来写成一个函数,再调用它,这样可以减少代码数量,加强可维护性.
如果有几个是一样的,就把事件指到同一函数就行了
Dlwxn 2003-12-06
  • 打赏
  • 举报
回复
如果是上面的1还是按楼上的做

如果是都一样,写一个然后把其它的事件指向它就可以了。
sixgj 2003-12-06
  • 打赏
  • 举报
回复
如果你的每个edit中事件都不相同,而且你又需要这些事件的话那就耐心下来一个个下吧。
如果每个edit的事件都是响应同一事件那只要同时选中这些控件写一次就是了。

5,931

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧