warum nicht? du kannst das ganze ja in eine Repeat-Until schleife machen.
Somit bekommst du es hinn das der nutzer unbedingt eines der Felder klicken muss:
Delphi-Quellcode:
var LDialog: TForm;
LRes: Integer;
begin
LDialog := CreateMessageDialog('Beispiel.', mtInformation, [mbYes, mbNo]);
DeleteMenu(GetSystemMenu(LDialog.Handle, False), SC_CLOSE, MF_BYCOMMAND);
DrawMenuBar(LDialog.Handle);
repeat
LRes := LDialog.ShowModal;
until (LRes = mrYes) or (LRes = mrNo);
if LRes = mrYes then
ShowMessage('Es wurde mit "Ja" bestätigt.');
LDialog.Free;
end;