4.14 MessageD!g函数 MessageD)g函数可以提供比较丰富的信息,比如显示的消息对话框类型, 按钮类型等,还能够得到用户的响应信息。其定义如下 Function MessageDlg(Const Msg: String; DIgType TMsgDIgType; Buttons: TMsgDlgButtons; HelpCtx LongInt ): Word; 其中: >Msg:表示对话框的提示信息 > DIgType:通过它可以在信息对话框中设置一定的图标来表达不同的 意义,比如警告、询问等。其取值如表42所示。 Bottons:是一个集合类型,它控制在信息对话框中可能出现的按钮名 称。其取值如表4-3所示 HelpCtx:用于定义帮助按钮打开的上下文帮助文件的ID,按F1也可 打开帮助文件 ccccccMccccccccccc:cMMH
4.1.4 MessageDlg 函数 MessageDlg 函数可以提供比较丰富的信息,比如显示的消息对话框类型, 按钮类型等,还能够得到用户的响应信息。其定义如下: Function MessageDlg (Const Msg :String ;DlgType :TMsgDlgType ; Buttons:TMsgDlgButtons ;HelpCtx :LongInt ) :Word ; 其中: ➢ Msg: 表示对话框的提示信息。 ➢ DlgType: 通过它可以在信息对话框中设置一定的图标来表达不同的 意义,比如警告、询问等。其取值如表4-2 所示。 ➢ Bottons: 是一个集合类型,它控制在信息对话框中可能出现的按钮名 称。其取值如表4-3所示。 ➢ HelpCtx :用于定义帮助按钮打开的上下文帮助文件的ID,按F1也可 打开帮助文件
ccccccMccccccccccc:cMMH
4.1.5 MessageDIgPos函数 MessagedigPos函数和 MessageDIg相似,但此函数多了一个 可控制弹出信息框的出现位置的功能。定义如下 Function MessageDlg (Const Msg String; di gType TMsgDigType But tons TMsgdigBut tons elpctx LongInt; x, Y: Integer): Word X、Y参数表示信息对话框出现的位置。 下面给出有关该函数的一个实例: MessagedigPos(’此信息对话框在100,100的位置上?’, MtInformation, [mbYes, mbNo, mbCance1 0,100,100) ccccccMccccccccccc:cMMH
4.1.5 MessageDlgPos 函数 MessageDlgPos 函数和 MessageDlg 相似,但此函数多了一个 可控制弹出信息框的出现位置的功能。定义如下: Function MessageDlg (Const Msg :String ;DlgType : TMsgDlgType ;Buttons :TMsgDlgButtons ;HelpCtx : LongInt ; X ,Y :Integer) :Word ; ➢X 、Y参数表示信息对话框出现的位置。 下面给出有关该函数的一个实例: MessageDlgPos('此信息对话框在100,100 的位置上?' , MtInformation,[mbYes,mbNo,mbCancel], 0,100,100);
4.1.6 MeaageDlgPosHelp函数 MessageD) gPoshelp函数定义如下: Function Message DlgPosHelp( Const Msg: string; Dlg Type TmsgDIg Type; Buttons: Tmsg DlgButtons; HelpCtx: Longint X, Y: Integer; const HelpFileName: string): Word; 其中: >Msg、 DIg Type、Buns和 HelpCtx参数在 MessageDlg函 数中已经介绍。 X、Y表示信息对话框出现的位置。 HelpFileName有特殊的含义,它将帮助信息对话框与之相 对应的帮助文件建立联系 ccccccMccccccccccc:cMMH
4.1.6 MeaageDlgPosHelp 函数 MessageDlgPosHelp 函数定义如下: Function MessageDlgPosHelp(Const Msg:string;DlgType: TmsgDlgType;Buttons: TmsgDlgButtons;HelpCtx:Longint; X,Y:Integer;const HelpFileName:string):Word; 其中: ➢Msg 、DlgType 、Buttons 和HelpCtx 参数在 MessageDlg 函 数中已经介绍。 ➢X 、Y 表示信息对话框出现的位置。 ➢HelpFileName 有特殊的含义,它将帮助信息对话框与之相 对应的帮助文件建立联系
4.17 MessageBox函数 Message Box函数是 Window API函数,但可在 Delphi7下直接使用。 Message Box函数的定义如下: Function Message BoX(Const Text: PAnsiChar; Const Caption: PAnsi Char Flags: LongInt=MB OKD: Integer; 其中 Text参数是一个长度可以超过255的字符串,它显示在对话框的中部, 能自动环绕。 > Caption参数类型与Text参数相同,它只是作为弹出的信息对话框的标 题,也可以超过255个字符。 Flags是一个 LongInt类型的参数,它可以从0开始取不同的值,使对话 框的可选项不同。它包含四个参数,各项参数如表4-4、表4-5、表46和表 4-7所示 ccccccMccccccccccc:cMMH
4.1.7 MessageBox 函数 MessageBox 函数是 Window API 函数,但可在 Delphi 7 下直接使用。 MessageBox 函数的定义如下: Function MessageBox(Const Text:PAnsiChar;Const Caption:PAnsiChar; [Flags:LongInt=MB_OK]):Integer; 其中: ➢Text 参数是一个长度可以超过 255 的字符串,它显示在对话框的中部, 能自动环绕。 ➢Caption 参数类型与 Text 参数相同,它只是作为弹出的信息对话框的标 题,也可以超过255个字符。 ➢Flags 是一个 LongInt 类型的参数,它可以从0 开始取不同的值,使对话 框的可选项不同。它包含四个参数,各项参数如表4-4、表4-5、表4-6和表 4-7所示