怎么弹出询问窗口？

Question

我想弹出的窗口不是delphi什么只有ok，标题不是‘error’就是‘information'，还没有声音，我想要的是，带声音比如’windwos感叹号‘，带中文字，ok就是确定，标题也别是这样，改成比如“提示信息”，“出错了”之类的，还有弹出的窗口，还要有windows都有的图标，比如“出错”“感叹号”“询问”！

Answer 1

可以调用Application.MessageBox函数, 例如:Application.MessageBox('Information图标 + OK', '标题', MB_ICONINFORMATION + MB_OK);
Application.MessageBox('Stop图标 + YesS/No', '标题', MB_ICONSTOP + MB_YESNO);
Application.MessageBox('Error图标 + OK/Cancel', '标题', MB_ICONERROR + MB_OKCANCEL);
Application.MessageBox('Warning图标 + Yes/No/Cancel', '标题', MB_ICONWARNING + MB_YESNOCANCEL);