对话框

 
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");
 
 
 
 




你可能感兴趣的:(对话框)