对话框

 
MessageBeep(MB_OK);发声
if(MessageDlg("Are you sure to Exit",mtConfirmation, TMsgDlgButtons()<<mbYes<<mbNo,0)==mrYes)
{
Close();
}
 
Application->ProcessMessages();
 
MessageBox(this->Handle,"Text","Tips",MB_OK|MB_ICONINFORMATION);
 
 
 
void __fastcall TForm1::btn1Click(TObject *Sender)
{
 Application->MessageBoxA("HelloWorld","Tips",0);
}
 
ShowMessage("Hello Roman");
 
 
 
 




原文地址:https://www.cnblogs.com/xe2011/p/2532885.html