メッセージダイアログの定義の仕方を教えてください

解決

双 2022-04-14 12:27:57 No: 150174

procedure TForm1.Button2Click(Sender: TObject);
var

mtContfirmation:integer;
begin

     if MessageDlg('リセットしますか?' + #13#10+
        'するなら''はい''を押してください',mtContfirmation,
        [mbYes,mbCancel],0) = mrYes then

begin

Count := 0;
Label1.Caption := IntToStr(Count);

end;
end;

[dcc32 エラー] Counter.pas(47): E2250 指定された引数で呼び出すことのできるオーバーロード関数 'MessageDlg' が定義されていません

とのエラーが出ます。初心者で本通りに打ったはずなのですがエラーが出て困っております。
どなたか回答お願いします。

igy 2022-04-14 13:07:42 No: 150175

>var
> mtContfirmation:integer;

この２行を削除してみるのは、いかがですか？

のぶ 2022-04-14 13:21:58 No: 150176

綴りが違うようです。
「t」　が余計に入っています。

×　mtContfirmation

〇　mtConfirmation

のぶ 2022-04-14 13:23:34 No: 150177

igyさんのおっしゃるように変数定義部分を削除して、
MessageDlgの引数の「mtContfirmation」を「mtConfirmation」に変えると
コンパイル通ります。

双 2022-04-19 15:12:30 No: 150183

お二人ともありがとうございます！、解決しました！