button abfragen auf ja/nein

[himitsu]

Zitat von Kruppi:

danke habs jetz

Delphi-Quellcode:

var
ButtonClick : integer;
begin
  //zeig Fenstern zum auswählen
   ButtonClick := messagedlg('Möchten Sie den aktuellen Benutzer entfernen?',mtCustom,
                              [mbYes,mbNo], 0);
  if ButtonClick = mrYes    then 
//mach irgendwas

if ButtonClick = mrYes then ist OK, aber mit if ButtonClick = mrNo then muß man aufpassen.

PS: Drück mal auf das [X].