Delphi的消息对话框

输入输出inputBox()函数MessageBox()ShowMessage

  对话框是Windows操作系统中程序与用户沟通的一种常见的交互方式,对话框可以向用户提供当前程序的运行状况,也可以接受用户输入的信息,在 Delphi中,对话框函数大体上可以分为两种——输入对话框函数和输出对话框函数。

  输入对话框函数用于接收用户在程序运行过程中输入的信息,其中包括 InputBox(),InputQuery()函数。

  输出对话框函数则用于显示一个对话框窗体和向用户报告当前程序的运行状态等信息,它包括ShowMessage()函数、 MessageDlg()函数。

下面就对各个函数分别加以介绍。

输入:
  InputBox()函数
  对话框函数中的InputBox()函数用于在程序运行的过程中显示一个包含一个字符串和按钮信息的输入对话框。
  它的语法结构如下所示:
  function InputBox(const ACaption, APrompt, ADefault: string): string;
  下面以一个示例来说明InputBox()函数的用法:

procedure TForm1.Button1Click(Sender: TObject);
var
  str : string;
begin
  str:=inputbox(‘南山古桃的对话框‘,‘请输入要平方的数据‘,‘0‘);
  edit1.Text:=‘南山古桃 得到的平方是:‘ + floattostr(strtofloat(str)*strtofloat(str));
end;

输出:
1.ShowMessage()函数--最常用,最简单
对话框函数中的ShowMessage()函数用于在程序运行的过程中显示包含一个字符串信息的对话框。
它的语法结构如下所示:
ShowMessage(const Msg:string);
如:ShowMessage(‘南山古桃 问候您!‘);

2.MessageBox()函数--正式程序时常用此函数输出(个人观点)
例:

--Application.MessageBox(‘MessageBox‘,‘警告‘,MB_ICONWARNING+MB_YesNo);
--MessageBox(Form1.Handle,‘MessageBox‘,‘提示‘,MB_ICONINFORMATION+MB_OkCancel);
--MessageBox(Form1.Handle,‘MessageBox‘,‘提示‘,MB_ICONINFORMATION+MB_OkCancel+MB_DEFBUTTON2);
-- if MessageBox(Form1.Handle,‘MessageBox‘,‘提示‘,MB_ICONINFORMATION+MB_OkCancel)= idOk then
     begin
       ShowMessage(‘Ok‘);
     end;
//********************************************************************************************************************

在Delphi中输入MessageBox按下F1,会出来帮助,可以查阅具体参数
int MessageBox(

HWND hWnd,    // handle of owner window
    LPCTSTR lpText,    // address of text in
message box
    LPCTSTR lpCaption,    // address of title of
message box
    UINT uType     // style of message box
   );

Specifies a set of bit flags that determine the contents and behavior of the
dialog box. This parameter can be a combination of flags from the following
groups of flags.

Specify one of the following flags to indicate the buttons contained in the
message box:
Flag    Meaning
MB_ABORTRETRYIGNORE    The message box contains three push
buttons: Abort, Retry, and Ignore.
MB_OK    The message box contains one push button: OK. This is
the default.
MB_OKCANCEL    The message box contains two push buttons: OK and
Cancel.
MB_RETRYCANCEL    The message box contains two push buttons:
Retry and Cancel.
MB_YESNO    The message box contains two push buttons: Yes and
No.
MB_YESNOCANCEL    The message box contains three push buttons:
Yes, No, and Cancel.

Specify one of the following flags to display an icon in the message box:
Flag    Meaning
MB_ICONEXCLAMATION,
MB_ICONWARNING
    An exclamation-point icon appears in the message box.
MB_ICONINFORMATION, MB_ICONASTERISK
    An icon consisting of a lowercase letter i in a circle
appears in the message box.
MB_ICONQUESTION    A question-mark icon appears in the message
box.
MB_ICONSTOP,
MB_ICONERROR,
MB_ICONHAND
    A stop-sign icon appears in the message box.

Specify one of the following flags to indicate the default button:
Flag    Meaning
MB_DEFBUTTON1    The first button is the default button.
MB_DEFBUTTON1 is the default unless MB_DEFBUTTON2, MB_DEFBUTTON3, or
MB_DEFBUTTON4 is specified.
MB_DEFBUTTON2    The second button is the default button.
MB_DEFBUTTON3    The third button is the default button.
MB_DEFBUTTON4    The fourth button is the default button.

Return Values
The return value is zero if there is not enough memory to create the message
box.
If the function succeeds, the return value is one of the following menu-item
values returned by the dialog box:
Value    Meaning
IDABORT    Abort button was selected.
IDCANCEL    Cancel button was selected.
IDIGNORE    Ignore button was selected.
IDNO    No button was selected.
IDOK    OK button was selected.
IDRETRY    Retry button was selected.
IDYES    Yes button was selected.

If a message box has a Cancel button, the function returns the IDCANCEL value
if either the ESC key is pressed or the Cancel button is selected. If the
message box has no Cancel button, pressing ESC has no effect.
//********************************************************************************************************************

3.MessageDlg()函数--南山古桃 不知道为什么出不来中文?
对话框函数中的MessageDlg()函数用于在程序运行的过程中显示包含一个字符串、位图和按钮信息的对话框。
它的语法结构如下所示:
function MessageDlg(const Msg: string; AType: TMsgDlgType; AButtons:
TMsgDlgButtons; HelpCtx: Longint): Word;
下面以一个示例来说明MessageDlg()函数的用法:
procedure TForm1.Button3Click(Sender: TObject);
begin
    //显示一个问号和Yes、No两个按钮的输出对话框
if MessageDlg(‘你想退出本程序吗?‘,
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
    //如果按下“yes”就显示一个感叹号的输出对话框
    MessageDlg(‘按下OK就退出‘, mtInformation,
      [mbOk], 0);
    Close;
end;
end;
在本例中MessageDlg()函数中使用到的参数Atype是TmsgDlgType类型,它的值主要有以下几种:mtWarning、 mtError、mtInformation、mtConfirmation,、mtCustom;而参数Abuttons是 TmsgDlgButtons类型,它的值主要有以下几种:mbYes、mbNo、 mbOK,、mbCancel、mbAbort、mbRetry、mbIgnore、mbAll、mbHelp。大家可以参照上面的代码略作修改来体会一下。

messagebox(handle,pchar(‘无效的产品信息‘+#13#10+‘请不要更改注册信息‘),pchar(‘错误‘),mb_ok+mb_iconerror+mb_applmodal);

4.MessageDlgPos
MessageDlgPos(‘控制位置100,200‘,mtWarning,[mbYes,mbNO],0,
100, 200);
MessageDlgPos(‘控制位置 屏幕中央‘,mtWarning,[mbYes,mbNO],0, -1,
-1);

时间: 2024-10-03 09:31:33

Delphi的消息对话框的相关文章

QT学习 之 对话框 (四) 字体对话框、消息对话框、文件对话框、进程对话框(超详细中文注释)

QMessageBox类: 含有Question消息框.Information消息框.Warning消息框和Critical消息框等 通常有两种方式可以来创建标准消息对话框: 一种是采用“基于属性”的API,一种是使用QMessageBox的静态方法. 后者书写容易,但缺少灵活性,针对用户给出的提示的信息不够丰富,并且不能自定义消息对话框里面的按钮提示信息.因此推荐第一种写法. [cpp] view plaincopy <span style="font-size:18px;"&

C# MessageBox 消息对话框

在程序中,我们经常使用消息对话框给用户一定的信息提示,如在操作过程中遇到错误或程序异常,经常会使用这种方式给用于以提示.在C#中,MessageBox消息对话框位于System.Windows.Forms命名空间中,一般情况,一个消息对话框包含信息提示文字内容.消息对话框的标题文字.用户响应的按钮及信息图标等内容.C#中允许开发人员根据自己的需要设置相应的内容,创建符合自己要求的信息对话框. MessageBox消息对话框只提供了一个方法Show(),用来把消息对话框显示出来.此方法提供了不同的

JavaScript-确认(confirm 消息对话框)

JavaScript-确认(confirm 消息对话框) confirm 消息对话框通常用于允许用户做选择的动作,如:"你对吗?"等.弹出对话框(包括一个确定按钮和一个取消按钮). 语法: confirm(str); 参数说明: str:在消息对话框中要显示的文本 返回值: Boolean值 返回值: 当用户点击"确定"按钮时,返回true 当用户点击"取消"按钮时,返回false 注: 通过返回值可以判断用户点击了什么按钮 看下面的代码: &l

[转载]ExtJs4 笔记(6) Ext.MessageBox 消息对话框

作者:李盼(Lipan) 出处:[Lipan] (http://www.cnblogs.com/lipan/)版权声明:本文的版权归作者与博客园共有.转载时须注明本文的详细链接,否则作者将保留追究其法律责任. 本篇演示消息对话框的用法,ExtJs封装了可能用到的各类消息框,并支持自定义的配置. 如下是用到的html: [html] <h1>各种消息框</h1> <div id="div1" class="content"> <

JavaScript-提问(prompt 消息对话框

JavaScript-提问(prompt 消息对话框) prompt弹出消息对话框,通常用于询问一些需要与用户交互的信息.弹出消息对话框(包含一个确定按钮.取消按钮与一个文本输入框). 语法: prompt(str1, str2); 参数说明: str1: 要显示在消息对话框中的文本,不可修改 str2:文本框中的内容,可以修改 返回值: 1. 点击确定按钮,文本框中的内容将作为函数返回值 2. 点击取消按钮,将返回null 看看下面代码: var myname=prompt("请输入你的姓名:

Qt——消息对话框的设计

1.消息对话框是什么 消息对话框(MessageBox)提供了一个模态对话框,用来通知用户某些信息,或者用来询问用户一个问题并获得一个答复. 先看下面2张图—— 第一张图是网易云音乐的界面截图,在删除歌单时,防止用户误操作,弹出了一个提示,提醒用户确认删除歌单: 第二张图是Photoshop中,用户输入的颜色值不合法之后弹出的提示框,告知用户输入的颜色值要求在000000和ffffff直接. 由此大概可以知道消息对话框有哪些作用了,它可以作为删除保护框,或提示用户某些信息等等. 在Qt中有一个Q

弹出消息对话框ScriptManager

//直接调用WebMessageBox方法 #region 弹出消息对话框 /// <summary> /// 弹出消息对话框 /// </summary> /// <param name="page">要弹出对话框的Page类</param> /// <param name="strMsg">对话框中提示的内容</param> public static void WebMessageBox(

VS2010/MFC对话框:消息对话框

消息对话框 我们在使用Windows系统的过程中经常会见到消息对话框,提示我们有异常发生或提出询问等.因为在软件开发中经常用到消息对话框,所以MFC提供了两个函数可以直接生成指定风格的消息对话框,而不需要我们在每次使用的时候都要去创建对话框资源和生成对话框类等.这两个函数就是CWnd类的成员函数MessageBox()和全局函数AfxMessageBox(). 一.CWnd::MessageBox()函数和AfxMessageBox()函数的用法 下面就分别讲解两个函数的用法. 1.CWnd::

JavaScript--提问(prompt 消息对话框)

prompt弹出消息对话框,通常用于询问一些需要与用户交互的信息.弹出消息对话框(包含一个确定按钮.取消按钮与一个文本输入框). 语法: prompt(str1, str2); 参数说明: str1: 要显示在消息对话框中的文本,不可修改 str2:文本框中的内容,可以修改 返回值: 1. 点击确定按钮,文本框中的内容将作为函数返回值 2. 点击取消按钮,将返回null 看看下面代码: var myname=prompt("请输入你的姓名:"); if(myname!=null) {