方法重载

setfocus 2003-01-20 04:29:01
我想用方法重载,在声明时写下以下语句:
1、Procedure KeyPressControl(vclobj:TKsCustomEdit;vkey:word;vShift:TShiftState); overload;

2、Procedure KeyPressControl(vclobj:TCustomEdit;vkey:word;vShift:TShiftState); overload;
是不是方法重载只能对函数进行?过程不行吗?为什么老是执行不了,错在哪?

报错信息:Unsatisfied forward or external declaration: 'KeyPressControl'
请高手帮助解答!最好能详细说明方法重载!
...全文
46 18 打赏 收藏 转发到动态 举报
写回复
用AI写文章
18 条回复
切换为时间正序
请发表友善的回复…
发表回复
bandrui 2003-01-20
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/topic/1377/1377184.xml?temp=.2568781
帮忙解决一下,谢谢
snake_eye 2003-01-20
  • 打赏
  • 举报
回复
希望你不是在不同类中写的二个函数,要不然过程和函数只是返回直的问题
虫灾和他们有联系吗?
hansion3406 2003-01-20
  • 打赏
  • 举报
回复
天哪
我要晕倒..
qxj 2003-01-20
  • 打赏
  • 举报
回复
过程是可以重载的,
devil_li 2003-01-20
  • 打赏
  • 举报
回复
把你的实现代码也贴出来!
devil_li 2003-01-20
  • 打赏
  • 举报
回复
报错的原因是因为第二个函数没有实现
setfocus 2003-01-20
  • 打赏
  • 举报
回复
期待正解!
ljyt 2003-01-20
  • 打赏
  • 举报
回复
TksCustomEdit是不是继承TCustomEdit来的?
xiaocuo_zrf 2003-01-20
  • 打赏
  • 举报
回复
首先可以确定overload可以申明任何函数,过程,方法
1.在一个方法中申明使用Overload他必须出现在Virtual,dynamic,abstract
之前
2.编译器使用类型和实际参数的个数来确定调用哪个重载的例程。如果编译器
无法确定调用哪个重载例程,就产生一个错误
laihecongxi 2003-01-20
  • 打赏
  • 举报
回复
to: fyje(冬原) 是参数必须不一致~
帮助中是这么写的 :must have distinguishing parameter lists :-)
laihecongxi 2003-01-20
  • 打赏
  • 举报
回复
同意 gzyzljk(正龙剑客)
fyje 2003-01-20
  • 打赏
  • 举报
回复
过程可以重载,但参数要一致:
1、Procedure KeyPressControl(;vkey:word;vShift:TShiftState); overload;

2、Procedure KeyPressControl(;vkey:word;vShift:TShiftState); overload;
会不会是你的下面两个参数不一致造成的vclobj:TKsCustomEdit和vclobj:TCustomEdit
setfocus 2003-01-20
  • 打赏
  • 举报
回复
不是不是!如果不重载是可以的,但是我现在只是改变语句1其中的一个参数就变成语句2,这只是我自己写的一个过程!
gzyzljk 2003-01-20
  • 打赏
  • 举报
回复
KeyPressControl是不是类办法?
xiaocuo_zrf 2003-01-20
  • 打赏
  • 举报
回复
KeyPressControl 是什么控件的方法?
你看不重载这样行不?
申明一个自己的过程
procedure MyKeyPressControl(vclobj:TKsCustomEdit;vkey:word;vShift:TShiftState);

.....
xxx.KeyPressControl:=MyKeyPressControl;
.....

procedure xxx.MyKeyPressControl (vclobj:TKsCustomEdit;vkey:word;vShift:TShiftState);
begin
//你的处理
end;


fyje 2003-01-20
  • 打赏
  • 举报
回复
不满足的向前或外部说明<Procedurename>
setfocus 2003-01-20
  • 打赏
  • 举报
回复
在线等待!UP有分!
setfocus 2003-01-20
  • 打赏
  • 举报
回复
补充!报错信息指向2语句!

5,390

社区成员

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

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