Delphi - MessageBox - default tlačítko

V tomto pripade vola delphi urcite WinAPI fciu, takze ak postradas popis k triedam Delphi a ak sa google polamalo , tak si to mozes pozriet aj v MSDN
http://msdn.microsoft.com/library/default.asp?url=/ library/en-us/winui/winui/windowsuserinterface/wind owing/dialogboxes/dialogboxreference/dialogboxfunct ions/messagebox.asp
zaujimat ta budu urcite flagy MB_DEFBUTTON1 az 4

BTW. na spajanie flagov odporucam radsej pouzivat bitove or, namiesto matematickeho +

if Application.MessageBox(0, 'Chcete naozaj vymazať záznam o klientovi?',
 'Varovanie', MB_ICONWARNING or MB_YESNO or MB_DEFBUTTON2) = mrYes then
  Table.Delete;

A čo tak:

if Application.MessageBox(0, 'Chcete naozaj vymazať záznam o klientovi?',
 'Varovanie', [MB_ICONWARNING, MB_YESNO, MB_DEFBUTTON2]) = mrYes then
  Table.Delete;

Tak to myslím robí samotné Delphi.

Edit: Práve som to skúsil (ten môj zápis) a Delphimu to nešmakuje. To ma len pomýlil zápis v Object Inspectore. Ale vyzerá to takto pekne, nie?

Mýliš si to s MessageDlg

Ďakujem páni, presne tú konštantu som hľadal. Ja som skúšal MB_DEFAULTNO a to bolo zle. Na presný názov som si nevedel spomenúť a nie vždy v Code Insight sa objaví tá správna voľba.