also irgendwas klapt da nich, schaut mal
ich hab im dialog
Delphi-Quellcode:
procedure TfmDialogDiensteAuchBuchen.btJaClick(Sender: TObject);
begin
ModalResult:=mrYes;
close;
end;
procedure TfmDialogDiensteAuchBuchen.btNeinClick(Sender: TObject);
begin
ModalResult:=mrNo;
close;
end;
und im Mainform das
Delphi-Quellcode:
case fmDialogDiensteAuchBuchen.ShowModal of
mrYes: Beep; //nur zum testen
mrNo: close;
end;
aber macht keinen Beep wenn ich auf Ja drück
