Einzelnen Beitrag anzeigen

Darkchild

Registriert seit: 13. Okt 2006
Ort: NRW
169 Beiträge
 
Delphi 2006 Enterprise
 
#1

MessageDlg abfangen der Buttons

  Alt 26. Okt 2006, 12:35
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
  Mit Zitat antworten Zitat