MessageDlg abfangen der Buttons

[Darkchild]

Hallo,

habe da mal eine Frage am rande:

Wenn ich einen MessageDlg habe mit den Buttons mbYes,mbNo und mbCancel und ich auf den jeweils geklickten Button reagieren möchte muss ich die wie ansprechen ?

Hier im Quellcode könnt ihr sehen wie ich es versucht habe, kommt dabei aber zu einer Typen- unverträglichkeit.

Delphi-Quellcode:

procedure Tfrmansimitarst.cxbtnloeschenClick(Sender: TObject);
begin
MessageDlg('Diesen Mitarbeiter wirklich löschen ?', mtConfirmation, [mbYes, mbNo, mbCancel], 0);
  if mtConfirmation = mbyes then
     begin
     DataModuleMain.ibtablemitarbeiter.Delete;
     end
  else
     DataModuleMain.ibtablemitarbeiter.Cancel;
end;

Also meine Frage jetzt, wie mache ich das richig ?

Gruss
Darkchild