关于自定义函数响应组件事件的问题。

寒星 2001-12-18 05:41:39
为了响应NMFTP的ConnectionFailed的事件,我写了一个名为OnConnectionFailed(Sender: TObject;iHandle: integer)的过程,其中iHandle是程序所需要一个变量,但由于此过程与ConnectionFailed(Sender: TObject)的参数个数不一致,系统不允许通过NMFTP1.ConnectionFailed := OnConnectionFailed来响应该事件。请问有什么好方法?
...全文
102 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
iBear 2001-12-19
  • 打赏
  • 举报
回复
看看sender对象吧,一般的delhi事件中的该对象就是触发该事件的对象,你只要sender as 该对象类名,就可以使用该对象了。
象按钮的click事件中,(sender as tbutton).caption:='请不要碰我!';
寒星 2001-12-19
  • 打赏
  • 举报
回复
To Liusp(夜深千帐灯):
问题的关键是我要在ConnectionFailed中使用iHandle变量。这样说吧,iHandle实际上是ServerSocket中对于每个Client的Handle,我需要在Client触发ConnectionFailed后将此处的错误提示给Client端。如果按老兄所说,在ConnectionFailed(Sender: TObject)如果将iHandle赋给OnConnectionFailed(Sender: TObject;iHandle: integer)呢?
寒星 2001-12-19
  • 打赏
  • 举报
回复
To iBear(大熊):
且不说此方法最终的效果如何,那Success(Trans_Type: TCmdType)事件怎么处理呢?我想这恐怕不是解决的方法吧。但感谢你的帮助。不知还有没有什么好的解决之道?
Liusp 2001-12-18
  • 打赏
  • 举报
回复
你在ConnectionFailed(Sender: TObject)中调用你自定义的OnConnectionFailed(Sender: TObject;iHandle: integer)不就行了吗?
寒星 2001-12-18
  • 打赏
  • 举报
回复
怎样使用?能说详细一点吗?
王集鹄 2001-12-18
  • 打赏
  • 举报
回复
借用Tag属性

5,927

社区成员

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

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