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

解決

---

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' が定義されていません

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

編集 削除

---

>var
>      mtContfirmation:integer;

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

編集 削除

---

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

×　mtContfirmation

〇　mtConfirmation

編集 削除

---

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

編集 削除

---

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

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。