Frage zu MessageDlg

[Trouble_Maker]

N´abend leute...

ich habe mal eine Frage zu meinem Code.

In der Delphi Hilfe steht folgendes:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

begin
  if MessageDlg('Willkommen in meiner Object PascalAnwendung. Jetzt beenden?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
  begin
    MessageDlg('Programm wird beendet.', mtInformation,
      [mbOk], 0);
    Close;
  end;
end;

wieso klappt mein Code nicht ?:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
MessageDlg('Soll der PC wirklich heruntergefahren werden ?',
        mtConfirmation,[mbYes, mbNo], 0) = mrYes then
            showmessage('ja')
            else
            showmessage('nein');

end;

Der Compiler meint, dass etwas mit dem "=" nicht in Ordnung wäre ... es wird ein ":=" erwartet. Aber das kann ja nicht sein...




Könnt ihr mir helfen

Trouble_Maker