Delphi 对话框《转》

MessageBox(Handle,'警告信息框','警告信息框',MB_ICONWARNING);       //警告信息框

MessageBox(Handle,'疑问信息框','疑问信息框',MB_ICONQUESTION);      //疑问信息框

MessageBox(Handle,'错误信息框','错误信息框',MB_ICONERROR);         //错误提示框

MessageBox(Handle,'提示信息框','提示信息框',MB_ICONASTERISK);      //提示信息框

MessageBox(Handle,'说明信息框','说明信息框',MB_HELP);              //说明信息框

MessageBox(Handle,'提示信息框','提示信息框',MB_OK);                //提示信息框

MessageBox(Handle,'确认信息框','确认信息框',MB_OKCANCEL);          //确认信息框 

MessageBox(Handle,'重试信息框','重试信息框',MB_RETRYCANCEL);       //重试信息框

Application.MessageBox(Handle,'是否信息框','是否信息框',MB_YESNO); //是否信息框(经本人XE2编译测试,需去掉Handle才能通过)

Application.MessageBox(Handle,'是否取消信息框','是否取消信息框',MB_YESNOCANCEL);   //是否取消信息框(经本人XE2编译测试,需去掉Handle才能通过)

ShowMessage('这个就是ShowMessage函数生成的信息提示框！');          //简单提示信息框