علت بروز خطا

[khoshblagh]

این مثال خود دلفی در موقع اجرا خطای Too many parameter ایجاد میکند . علت چیست؟متشکرم

if MessageDlg('Welcome to my Delphi application. Exit now?',
mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes then
begin
MessageDlg('Exiting the Delphi application.', mtInformation,
[mbOk], 0, mbOk);
Close;
end;

[mohsen24000]

عبارت بعد از 0 که نوشتی اضافه است.


MessageDlg('Confirmation',mtError,[mbYes, mbNo], 0);