привет, помогите написать функцию для кнопки

необходимо чтобы при нажатии на кнопку Button2(Выход), выскакивало окно сообщения, при нажатии на Ok -- программа закрывалась, при нажатии на Cancel -- возвращалась в программу.

вот мой не рабочий пример:

void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(MessageDlg("Вы действительно хотите выйти?",
mtInformation, TMsgDlgButtons()<<mbOK<<mbCancel,0)==mbOK);
{
Application->Terminate();
}
return;
}

Такие веши чуть по другому пишутся.
В обработчике своей кнопке посылаеш в в головную форму сообшение WM_CLOSE. В головной форме отрабатываеш onClose. Где уже размешаеш модальное окно, с вопросом "Вы действительно хотите выйти?". И взависимости от ответа делаеш возврат из функции. Константы возврата не помню. Но вроде было 4 константы. : 1)убить программу 2) продолжать работу дальше 3) прикрыть окно 4) спрятать окно.
Все остальное на себя возьмет механизм VCL.

ребят спасибо.