delphi – 实际参数太多(消息对话)

发布时间：2020-12-15 09:18:25 所属栏目：大数据来源：网络整理

导读：我继承了一个程序,它有很多问题.最新的一个是太多实际参数警告： if MessageDlgPos('IS THIS CORRECT? ',mtConfirmation,**[mbyes,mbno],400,450,mbno) = mrno then begin** edtPstvEmplyNmbr.SetFocus; xitFlg:= True; 粗体部分是错误突出显示的部分. 注意

我继承了一个程序,它有很多问题.最新的一个是太多实际参数警告：

if MessageDlgPos('IS THIS CORRECT? ',mtConfirmation,**[mbyes,mbno],400,450,mbno) = mrno then begin**
    edtPstvEmplyNmbr.SetFocus;
    xitFlg:= True;

粗体部分是错误突出显示的部分.

注意：程序工作,只是不在我的机器上.它是使用相同版本的Delphi(7)开发的,但是在clx(kylix)环境中.我想我(可能)已经解决了clx和vcl(我当前的环境)之间的所有不兼容问题,但可能是我错过了一个产生此错误的组件.我会尽力澄清任何问题,但请记住,我只在几个月内开发Delphi.

解决方法

德尔福的VCL和Kylix的CLX并不完全兼容.特别是,一些类似命名的函数会使用不同数量的参数,因为您已经了解了第一手资料.

现代版本的Delphi支持您尝试调用的MessageDlgPos版本,但很明显Delphi 7没有.可能发生的是,当VCL版本只有六个参数时,CLX引入了七参数重载,然后后来的Delphi版本将CLX版本移植回VCL.请记住,Delphi 7已有十多年的历史.

要查看可以使用的功能版本,请查看Dialogs.pas.

如果你有六个参数版本,你可能只需删除最后一个参数,然后只处理默认按钮可能不是你想要的那个事实.另一种方法是调用MessageBox,它将允许您指定默认按钮,但代价是能够指定窗口位置.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!