MessageBox、MessageBeep、Beep 和 messagedlg用法

消息框是个很常用的控件，属性比较多，本文列出了它的一些常用方法，及指出了它的一些应用场合。

1.最简单用法,不带图形

MessageBox(0,'不同意','提示',MB_OK);

MessageBox(0,'不同意','提示',MB_OKCANCEL );

2.警告对话框:

MessageBox(0,'密码不能为空,请务必输入密码','警告',MB_ICONEXCLAMATION);

3.提示信息对话框:

MessageBox(0,'密码不能为空,请务必输入密码','提示',MB_ICONASTERISK and MB_ICONINFORMATION);

4.复杂用法:

MessageBox(Handle, PChar('进程' + Listview1.Selected.caption +'不能被结束!'), PChar('提示'), MB_ICONEXCLAMATION);

附常用属性

系统默认图标，可在消息框上显示
X错误 MB_ICONHAND, MB_ICONSTOP, and MB_ICONERROR
?询问 MB_ICONQUESTION
!警告 MB_ICONEXCLAMATION and MB_ICONWARNING
i信息 MB_ICONASTERISK and MB_ICONINFORMATION

按钮的形式
MB_OK 默认
MB_OKCANCEL 确定取消
MB_YESNO 是否
MB_YESNOCANCEL 是否取消

返回值
IDCANCEL 取消被选
IDNO 否被选
IDOK 确定被选
IDYES 是被选

补充：
以上消息框的用法是在Delphi中的应用，如果不是，则要MessageBox(NULL,"ddd","ddd",MB_OK); 或MessageBox(hWnd,"ddd","ddd",MB_OK); hWnd为某窗口的句柄，或者直接用AfxMessageBox。

MessageBeep () 函数是用来播放一段音乐的，函数中加入一个参数则就可以播放相应的音乐，例如MessageBeep (0)则播放默认的声音，可以传入的参数还可以选择如下：

0 ：从机器的扬声器中发出蜂鸣声

　　MB_ICONASTERISK ：播放由SystemAsterisk定义的声音

　　MB_ICONEXCLAMATION ：播放由SystemExclamation定义的声音

　　MB_ICONHAND ：播放由SystemHand定义的声音

　　MB_ICONQUESTION ：播放由SystemQuestion定义的声音

　　MB_OK 播放由SystemDefault定义的声音

Return Values（返回值）:

1.Nonzero indicates success. (非零表示成功)

2.Zero indicates failure. （零表示不成功）

Windows API 就提供了一个这样奇妙的发音函数，它就是Beep函数。Beep可以通过控制主板扬声器的发声频率和节拍来演奏美妙的旋律，本文根据音乐简谱来演奏几首优美的歌曲，用以展现Beep的疯狂魅力。

首先我们来Beep的函数原型：

BOOL Beep(
DWORD dwFreq;
DWORD dwDuration;
);

参数说明：

dwFreq 指定要发出的频率(HZ)
dwDuration 指定发音的时长，以毫秒为单位。

===================================MEssageDLG=============

procedure TForm1.Button1Click(Sender: TObject);
var
S:string;
begin
if MessageDlg('提示框',mtInformation,[mbok,mbyes],0)=mryes then
messagebeep(MB_ICONEXCLAMATION);
end;

TMsgDlgType = (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom);

TMsgDlgBtn = (mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry, mbIgnore,
mbAll, mbNoToAll, mbYesToAll, mbHelp);

const
mrNone     = 0;
mrOk       = idOk;
mrCancel   = idCancel;
mrAbort    = idAbort;
mrRetry    = idRetry;
mrIgnore   = idIgnore;
mrYes      = idYes;
mrNo       = idNo;
mrAll      = mrNo + 1;
mrNoToAll = mrAll + 1;
mrYesToAll = mrNoToAll + 1;

MessageBox、MessageBeep、Beep 和 messagedlg用法相关推荐

Delphi中Messagedlg用法
Delphi中Messagedlg用法 if MessageDlg('即将退出,是否继续?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin ...
python的messagebox的用法_Python GUI编程学习笔记之tkinter中messagebox、filedialog控件用法详解...
本文实例讲述了Python GUI编程学习笔记之tkinter中messagebox.filedialog控件用法.分享给大家供大家参考,具体如下: 相关内容: messagebox 介绍使用 fi ...
C/C++——有关Beep()函数的用法
首先,你要引用头文件:windows.h 然后,我们就可以用Beep这个函数了. Beep(int,int); 前一个int类型的参数是它的音调,后一个int类型的参数就是这个音调的播放时间,以毫秒来 ...
C++中MessageBox（）的详细用法（转载）
1.MessageBox("这是一个最简单的消息框!"); 2.MessageBox("这是一个有标题的消息框!","标题"); 3.Mes ...
python messagebox弹窗退出_Python messagebox.showinfo方法代码示例
本文整理汇总了Python中tkinter.messagebox.showinfo方法的典型用法代码示例.如果您正苦于以下问题:Python messagebox.showinfo方法的具体用法?Py ...
python关于messagebox题目_Python messagebox.askokcancel方法代码示例
本文整理汇总了Python中tkinter.messagebox.askokcancel方法的典型用法代码示例.如果您正苦于以下问题:Python messagebox.askokcancel方法的具 ...
pb中数据窗口函数小结
一.连接数据库连接数据库也就是指定事务对象.PowerBuilder提供了两个函数:SetTrans()和SetTransObject(). 语法格式: dw_control.SetTrans(Tr ...
PB函数大全【转自 http://blog.csdn.net/xiaoxian8023 】
Abs() 功能计算绝对值. 语法Abs ( n ) 参数n:要得到绝对值的数值型变量或表达式返回值返回值的数据类型与n的数据类型相同,函数执行成功时返回n的绝对值.如果参数n的值为NULL,Abs( ...
PB函数大全（超全，解析很全面）
这几天在pb花的时间比较长,用一个新的ide,一个新的语言,在短时间内去开发一个MIS,也是比较有难度的一件事儿.最主要的是熟悉语法格式和各种常用函数,再结合以前所学的编程语言,来快速消化并掌握它. ...

MessageBox、MessageBeep、Beep 和 messagedlg用法

MessageBox、MessageBeep、Beep 和 messagedlg用法相关推荐

最新文章

热门文章