领悟旧事

    ShowMessage(L"showmessage");
 
void __fastcall TForm2::btnOneButtonAlertClick(TObject *Sender)
{
  // Show a standard alert with a single OK button
  ShowMessage("Hello World!");
}
//---------------------------------------------------------------------------

void __fastcall TForm2::btnMultipleButtonAlertClick(TObject *Sender)
{
 /* Show a multiple-button alert that triggers different code blocks according to
  your input */
 switch (MessageDlg("Choose a button:", TMsgDlgType::mtInformation,
  TMsgDlgButtons() << TMsgDlgBtn::mbYes << TMsgDlgBtn::mbNo << TMsgDlgBtn::mbCancel , 0))
 {
  case mrYes :
   ShowMessage("You choose Yes");
   break;
  case mrNo:
   ShowMessage("You choose No");
   break;
  case mrCancel:
   ShowMessage("You choose Cancel");
   break;
 }
}
//---------------------------------------------------------------------------