我的过程定义如下:
procedure q_dresclick (sender:Tobject;rescheck1:TCheckbox;rescheck2:TCheckbox);
调用如下:
drescheckbox[i,1].OnClick:=q_dresclick(drescheckbox[i,1],drescheckbox[i,1],drescheckbox[i,2]);
其中:
drescheckbox[i,1],drescheckbox[i,2]为TCheckbox
编译出错如下:
[Error] client_main.pas(222): Incompatible types: 'TNotifyEvent' and 'procedure, untyped pointer or untyped parameter'
请问该如何办?
procedure q_dresclick (sender:Tobject;rescheck1:TCheckbox;rescheck2:TCheckbox);
调用如下:
drescheckbox[i,1].OnClick:=q_dresclick(drescheckbox[i,1],drescheckbox[i,1],drescheckbox[i,2]);
其中:
drescheckbox[i,1],drescheckbox[i,2]为TCheckbox
编译出错如下:
[Error] client_main.pas(222): Incompatible types: 'TNotifyEvent' and 'procedure, untyped pointer or untyped parameter'
请问该如何办?
解决方案 »
- 图片格式的问题?
- 找了很久很久的一个新手学习Midas,WebService,Soap的问题,别见笑
- 怎么将ACCESS数据库的表绑定到打包程序中,用注册表或ini文件???
- 有关Delphi打包的问题2
- 高分请教高手:DBGRID在设计状态时按右键弹出一个POPUPMENU是在哪个事件里写的?(在线)
- 如何把ADOStoredPro得到的内容显示在DBGrid中?
- 哪里有delphi电子书籍下载?
- 刚刚开发完成的一个Telnet程序,请感兴趣的同志们下载测试!
- 高薪寻找合作者:医院信息管理系统
- Codelphi网站推荐的《Delphi技术手册》怎么样啊有买的人吗,评论一下
- 今天生日!散分
- 关于窗体的问题!(在线等...)
procedure TForm1.CheckBox1Click(Sender: TObject);
所以你的过程应为:
procedure q_dresclick (sender:Tobject);
赋值语句为:
drescheckbox[i,1].OnClick:=q_dresclick;