if (Application->MessageBoxA("Si o No","Opciones",4 | MB_ICONQUESTION)==ID_YES) { ShowMessage("Escogiste Si"); } else { ShowMessage("Escogiste No"); }