Topic: Message Box Yes/No/Cancel

How can I have a message Box with the buttons Yes, No, Cancel?

Re: Message Box Yes/No/Cancel

    if MessageDlg('message', mtInformation, mbYes+mbNo+mbCancel, 0) = mrYes then
    begin
        ShowMessage('Clicked Yes');
    end;
Dmitry.