对话框

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




posted @ 2012-06-03 17:52  XE2011  阅读(123)  评论(0)    收藏  举报