Application.MessageBox 详解

　　function TApplication.MessageBox(const Text, Caption: PChar;

　　Flags: Longint): Integer;

　　1. Text：要显示的讯息

　　2. Caption：讯息窗口的标题列文字

　　3. Flags：讯息旗标

　　3.1. 可指定讯息窗口上的图标

　　3.2. 可指定讯息窗口出现的按钮

　　3.3. 可指定预设Focus在哪一个按钮

　　3.4. 可指定是否 Modal

　　3.5. 其它

　　Text、Caption 自变量为 PCahr 型态，字符串型态的变量可用 PChar()

　　转换，若直接传入一个字符串的话，就不用转型。

　　例如：

　　var s: string;

　　....

　　s := '存档失败';

　　Application.MessageBox(PChar(s), '错误', MB_ICONERROR);

　　Flag 自变量为 Longint 型态，可用的传入值有：

　　1. 指定讯息窗口上的图标

　　1.1 MB_ICONEXCLAMATION 或 MB_ICONWARNING

　　出现「黄三角形内有一个惊叹号」图示

　　1.2 MB_ICONINFORMATION 或 MB_ICONASTERISK

　　出现「白色椭圆内有一个蓝色小写 i」图示

　　1.3 MB_ICONQUESTION

　　出现「问号」图示

　　1.4 MB_ICONSTOP 或 MB_ICONERROR 或 MB_ICONHAND

　　出现「红色X」图示

　　2. 指定讯息窗口出现的按钮

　　2.1 MB_ABORTRETRYIGNORE

　　出现「Abort」「Retry」「Ignore」三个按钮

　　2.2 MB_OK

　　出现「Ok」按钮，为默认值。

　　2.3 MB_OKCANCEL

　　出现「Ok」「Cancel」两个按钮

　　2.4 MB_RETRYCANCEL

　　出现「Retry」「Cancel」两个按钮

　　2.5 MB_YESNO

　　出现「Yes」「No」两个按钮

　　2.6 MB_YESNOCANCEL

　　出现「Yes」「No」「Cancel」三个按钮

　　3. 可指定预设Focus在哪一个按钮

　　3.1 MB_DEFBUTTON1

　　beijingkaifapiao.dwcxa.com;

　　beijingdaikaifapiao.dwcxa.com;

　　shanghaikaifapiao.dwcxa.com;

　　shanghaidaikaifapiao.dwcxa.com;

　　guangzhoukaifapiao.dwcxa.com;

　　shenzhenfapiao.dwcxa.com;

　　shenzhenkaifapiao.dwcxa.com;

　　jinanfapiao.dwcxa.com;

　　jinankaifapiao.dwcxa.com;

　　jinandaikaifapiao.dwcxa.com;

　　qingdaofapiao.dwcxa.com;

　　qingdaokaifapiao.dwcxa.com;

　　qingdaodaikaifapiao.dwcxa.com;

　　nanjingfapiao.dwcxa.com;

　　nanjingdaikaifapiao.dwcxa.com;

　　wuxifapiao.dwcxa.com;

　　wuxikaifapiao.dwcxa.com;

　　wuxidaikaifapiao.dwcxa.com;

　　suzhoufapiao.dwcxa.com;

　　suzhoukaifapiao.dwcxa.com;

　　suzhoudaikaifapiao.dwcxa.com;

　　zhengzhoufapiao.dwcxa.com;

　　zhengzhoukaifapiao.dwcxa.com;

　　zhengzhoudaikaifapiao.dwcxa.com;

　　shijiazhuangfapiao.dwcxa.com;

　　shijiazhuangkaifapiao.dwcxa.com;

　　shijiazhuangdaikaifapiao.dwcxa.com;

　　hangzhoufapiao.dwcxa.com;

　　hangzhoudaikaifapiao.dwcxa.com;

　　ningbofapiao.dwcxa.com;

　　ningbokaifapiao.dwcxa.com;

　　ningbodaikaifapiao.dwcxa.com;

　　xianfapiao.dwcxa.com;

　　xiankaifapiao.dwcxa.com;

　　xiandaikaifapiao.dwcxa.com;

　　changshafapiao.dwcxa.com;

　　changshakaifapiao.dwcxa.com;

　　changshadaikaifapiao.dwcxa.com;

　　zhongqingkaifapiao.dwcxa.com;

　　zhongqingdaikaifapiao.dwcxa.com;

　　fuzhoufapiao.dwcxa.com;

　　fuzhoukaifapiao.dwcxa.com;

　　fuzhoudaikaifapiao.dwcxa.com;

　　xiamenfapiao.dwcxa.com;

　　xiamenkaifapiao.dwcxa.com;

　　xiamendaikaifapiao.dwcxa.com;

　　tianjinfapiao.dwcxa.com;

　　tianjinkaifapiao.dwcxa.com;

　　tianjindaikaifapiao.dwcxa.com;

　　kunmingfapiao.dwcxa.com;

　　kunmingkaifapiao.dwcxa.com;

　　kunmingdaikaifapiao.dwcxa.com;

　　chengdufapiao.dwcxa.com;

　　chengdukaifapiao.dwcxa.com;

　　chengdudaikaifapiao.dwcxa.com;

　　hefeifapiao.dwcxa.com;

　　hefeikaifapiao.dwcxa.com;

　　hefeidaikaifapiao.dwcxa.com;

　　wuhanfapiao.dwcxa.com;

　　wuhankaifapiao.dwcxa.com;

　　wuhandaikaifapiao.dwcxa.com;

　　dalianfapiao.dwcxa.com;

　　daliandaikaifapiao.dwcxa.com;

　　shenyangfapiao.dwcxa.com;

　　shenyangkaifapiao.dwcxa.com;

　　shenyangdaikaifapiao.dwcxa.com;

　　haerbinfapiao.dwcxa.com;

　　haerbinkaifapiao.dwcxa.com;

　　haerbindaikaifapiao.dwcxa.com;

　　changchunfapiao.dwcxa.com;

　　changchundaikaifapiao.dwcxa.com;

　　taiyuanfapiao.dwcxa.com;

　　taiyuankaifapiao.dwcxa.com;

　　taiyuandaikaifapiao.dwcxa.com;

　　lanzhoufapiao.dwcxa.com;

　　lanzhoukaifapiao.dwcxa.com;

　　lanzhoudaikaifapiao.dwcxa.com;

　　jilinfapiao.dwcxa.com;

　　jilinkaifapiao.dwcxa.com;

　　jilindaikaifapiao.dwcxa.com;

　　nanchangfapiao.dwcxa.com;

　　nanchangkaifapiao.dwcxa.com;

　　nanchangdaikaifapiao.dwcxa.com;

　　guiyangfapiao.dwcxa.com;

　　guiyangkaifapiao.dwcxa.com;

　　guiyangdaikaifapiao.dwcxa.com;

　　nanningfapiao.dwcxa.com;

　　nanningkaifapiao.dwcxa.com;

　　nanningdaikaifapiao.dwcxa.com;

　　haikoufapiao.dwcxa.com;

　　haikoukaifapiao.dwcxa.com;

　　haikoudaikaifapiao.dwcxa.com;

　　jinhuadaikaifapiao.dwcxa.com;

　　wenzhoudaikaifapiao.dwcxa.com;

　　yangzhoudaikaifapiao.dwcxa.com;

　　wulumuqidaikaifapiao.dwcxa.com;

　　qinhuangdaodaikaifapiao.dwcxa.com;

　　cangzhoudaikaifapiao.dwcxa.com;

　　xiningdaikaifapiao.dwcxa.com;

　　huhehaotekaifapiao.dwcxa.com;

　　cangzhoudaikaifapiao.dwcxa.com;

　　cangzhoufapiao.dwcxa.com;

　　cangzhoukaifapiao.dwcxa.com;

　　zhangzhoudaikaifapiao.dwcxa.com;

　　zhangzhoufapiao.dwcxa.com;

　　zhangzhoukaifapiao.dwcxa.com;

　　zhenjiangdaikaifapiao.dwcxa.com;

　　zhenjiangfapiao.dwcxa.com;

　　zhenjiangkaifapiao.dwcxa.com;

　　zhongshandaikaifapiao.dwcxa.com;

　　zhongshanfapiao.dwcxa.com;

　　zhongshankaifapiao.dwcxa.com;

　　zhuhaidaikaifapiao.dwcxa.com;

　　zhuhaifapiao.dwcxa.com;

　　zhuhaikaifapiao.dwcxa.com;

　　huhehaotefapiao.dwcxa.com;

　　huhehaotekaifapiao.dwcxa.com;

　　foshandaikaifapiao.dwcxa.com;

　　foshanfapiao.dwcxa.com;

　　foshankaifapiao.dwcxa.com;

　　huizhoudaikaifapiao.dwcxa.com;

　　huizhoufapiao.dwcxa.com;

　　huizhoukaifapiao.dwcxa.com;

　　jinhuadaikaifapiao.dwcxa.com;

　　jinhuafapiao.dwcxa.com;

　　jinhuakaifapiao.dwcxa.com;

　　taizhoudaikaifapiao.dwcxa.com;

　　taizhoufapiao.dwcxa.com;

　　taizhoukaifapiao.dwcxa.com;

　　luoyangdaikaifapiao.dwcxa.com;

　　luoyangfapiao.dwcxa.com;

　　luoyangkaifapiao.dwcxa.com;

　　qinhuangdaodaikaifapiao.dwcxa.com;

　　qinhuangdaofapiao.dwcxa.com;

　　qinhuangdaokaifapiao.dwcxa.com;

　　quanzhoudaikaifapiao.dwcxa.com;

　　quanzhoufapiao.dwcxa.com;

　　quanzhoukaifapiao.dwcxa.com;

　　tangshandaikaifapiao.dwcxa.com;

　　tangshanfapiao.dwcxa.com;

　　tangshankaifapiao.dwcxa.com;

　　wenzhoudaikaifapiao.dwcxa.com;

　　wenzhoufapiao.dwcxa.com;

　　wenzhoukaifapiao.dwcxa.com;

　　xuzhoudaikaifapiao.dwcxa.com;

　　xuzhoufapiao.dwcxa.com;

　　xuzhoukaifapiao.dwcxa.com;

　　shantoudaikaifapiao.dwcxa.com;

　　shantoufapiao.dwcxa.com;

　　shantoukaifapiao.dwcxa.com;

　　yantaidaikaifapiao.dwcxa.com;

　　yantaifapiao.dwcxa.com;

　　yantaikaifapiao.dwcxa.com;

　　yanchengdaikaifapiao.dwcxa.com;

　　yanchengfapiao.dwcxa.com;

　　yanchengkaifapiao.dwcxa.com;

　　yangzhoudaikaifapiao.dwcxa.com;

　　yangzhoufapiao.dwcxa.com;

　　yangzhoukaifapiao.dwcxa.com;

　　wulumuqidaikaifapiao.dwcxa.com;

　　wulumuqifapiao.dwcxa.com;

　　wulumuqikaifapiao.dwcxa.com;

　　chengdedaikaifapiao.dwcxa.com;

　　chengdefapiao.dwcxa.com;

　　chengdekaifapiao.dwcxa.com;

　　dandongdaikaifapiao.dwcxa.com;

　　dandongfapiao.dwcxa.com;

　　dandongkaifapiao.dwcxa.com;

　　dongݸfapiao.dwcxa.com;

　　dongݸkaifapiao.dwcxa.com;

　　dongyingdaikaifapiao.dwcxa.com;

　　dongyingfapiao.dwcxa.com;

　　dongyingkaifapiao.dwcxa.com;

　　ganzhoudaikaifapiao.dwcxa.com;

　　ganzhoufapiao.dwcxa.com;

　　ganzhoukaifapiao.dwcxa.com;

　　huludaodaikaifapiao.dwcxa.com;

　　huludaofapiao.dwcxa.com;

　　huludaokaifapiao.dwcxa.com;

　　jixidaikaifapiao.dwcxa.com;

　　jixifapiao.dwcxa.com;

　　jixikaifapiao.dwcxa.com;

　　lishuidaikaifapiao.dwcxa.com;

　　lishuifapiao.dwcxa.com;

　　lishuikaifapiao.dwcxa.com;

　　liuzhoudaikaifapiao.dwcxa.com;

　　liuzhoufapiao.dwcxa.com;

　　liuzhoukaifapiao.dwcxa.com;

　　loudidaikaifapiao.dwcxa.com;

　　loudifapiao.dwcxa.com;

　　loudikaifapiao.dwcxa.com;

　　mianyangdaikaifapiao.dwcxa.com;

　　mianyangfapiao.dwcxa.com;

　　mianyangkaifapiao.dwcxa.com;

　　nantongdaikaifapiao.dwcxa.com;

　　nantongfapiao.dwcxa.com;

　　nantongkaifapiao.dwcxa.com;

　　panzhihuadaikaifapiao.dwcxa.com;

　　panzhihuafapiao.dwcxa.com;

　　panzhihuakaifapiao.dwcxa.com;

　　pingdingshandaikaifapiao.dwcxa.com;

　　pingdingshanfapiao.dwcxa.com;

　　pingdingshankaifapiao.dwcxa.com;

　　rizhaodaikaifapiao.dwcxa.com;

　　rizhaofapiao.dwcxa.com;

　　rizhaokaifapiao.dwcxa.com;

　　tianshuidaikaifapiao.dwcxa.com;

　　tianshuifapiao.dwcxa.com;

　　tianshuikaifapiao.dwcxa.com;

　　weihaidaikaifapiao.dwcxa.com;

　　weihaifapiao.dwcxa.com;

　　weihaikaifapiao.dwcxa.com;

　　xiningdaikaifapiao.dwcxa.com;

　　xiningfapiao.dwcxa.com;

　　xiningkaifapiao.dwcxa.com;

　　xianyangdaikaifapiao.dwcxa.com;

　　xianyangfapiao.dwcxa.com;

　　xianyangkaifapiao.dwcxa.com;

　　yinchuandaikaifapiao.dwcxa.com;

　　yinchuanfapiao.dwcxa.com;

　　yinchuankaifapiao.dwcxa.com;

　　yingkoudaikaifapiao.dwcxa.com;

　　yingkoufapiao.dwcxa.com;

　　yingkoukaifapiao.dwcxa.com;

　　zibodaikaifapiao.dwcxa.com;

　　zibofapiao.dwcxa.com;

　　zibokaifapiao.dwcxa.com;

　　zigongdaikaifapiao.dwcxa.com;

　　zigongfapiao.dwcxa.com;

　　zigongkaifapiao.dwcxa.com;

　　beijingzhusufapiao.dwcxa.com;

　　beijingcanyinfapiao.dwcxa.com;

　　jinancanyinfapiao.dwcxa.com;

　　jinanzhusufapiao.dwcxa.com;

　　hefeizhusufapiao.dwcxa.com;

　　hefeicanyinfapiao.dwcxa.com;

　　suzhouzhusufapiao.dwcxa.com;

　　suzhoucanyinfapiao.dwcxa.com;

　　ningbocanyinfapiao.dwcxa.com;

　　ningbozhusufapiao.dwcxa.com;

　　wuxicanyinfapiao.dwcxa.com;

　　wuxizhusufapiao.dwcxa.com;

　　nanjingcanyinfapiao.dwcxa.com;

　　nanjingzhusufapiao.dwcxa.com;

　　changshazhusufapiao.dwcxa.com;

　　changshacanyinfapiao.dwcxa.com;

　　qingdaocanyinfapiao.dwcxa.com;

　　qingdaozhusufapiao.dwcxa.com;

　　zhongqingzhusufapiao.dwcxa.com;

　　zhongqingcanyinfapiao.dwcxa.com;

　　chengduzhusufapiao.dwcxa.com;

　　chengducanyinfapiao.dwcxa.com;

　　shanghaizhusufapiao.dwcxa.com;

　　shanghaidaikaicanyinfapiao.dwcxa.com;

　　haerbincanyinfapiao.dwcxa.com;

　　haerbinzhusufapiao.dwcxa.com;

　　changchunzhusufapiao.dwcxa.com;

　　changchuncanyinfapiao.dwcxa.com;

　　shenyangzhusufapiao.dwcxa.com;

　　shenyangcanyinfapiao.dwcxa.com;

　　zhengzhouzhusufapiao.dwcxa.com;

　　zhengzhoucanyinfapiao.dwcxa.com;

　　nanjingzhusufapiao.dwcxa.com;

　　nanjingcanyinfapiao.dwcxa.com;

　　hangzhouzhusufapiao.dwcxa.com;

　　hangzhoucanyinfapiao.dwcxa.com;

　　kunmingzhusufapiao.dwcxa.com;

　　kunmingcanyinfapiao.dwcxa.com;

　　dalianzhusufapiao.dwcxa.com;

　　daliancanyinfapiao.dwcxa.com;

　　wuhanzhusufapiao.dwcxa.com;

　　wuhancanyinfapiao.dwcxa.com;

　　fuzhoucanyinfapiao.dwcxa.com;

　　fuzhouzhusufapiao.dwcxa.com;

　　guangzhoucanyinfapiao.dwcxa.com;

　　guangzhouzhusufapiao.dwcxa.com;

　　shijiazhuangcanyinfapiao.dwcxa.com;

　　shijiazhuangzhusufapiao.dwcxa.com;

　　xiancanyinfapiao.dwcxa.com;

　　xianzhusufapiao.dwcxa.com;

　　shenzhencanyinfapiao.dwcxa.com;

　　shenzhenzhusufapiao.dwcxa.com;

　　taiyuanzhusufapiao.dwcxa.com;

　　taiyuancanyinfapiao.dwcxa.com;

　　nanchangzhusufapiao.dwcxa.com;

　　nanchangcanyinfapiao.dwcxa.com;

　　guiyangzhusufapiao.dwcxa.com;

　　guiyangcanyinfapiao.dwcxa.com;

　　guangzhoudingefapiao.dwcxa.com;

　　shenzhendingefapiao.dwcxa.com;

　　zhongqingdingefapiao.dwcxa.com;

　　nanjingdingefapiao.dwcxa.com;

　　qingdaodingefapiao.dwcxa.com;

　　shanghaidingefapiao.dwcxa.com;

　　jinandingefapiao.dwcxa.com;

　　shenyangdingefapiao.dwcxa.com;

　　haerbindingefapiao.dwcxa.com;

　　chengdudingefapiao.dwcxa.com;

　　nanningdingefapiao.dwcxa.com;

　　suzhoudingefapiao.dwcxa.com;

　　changchundingefapiao.dwcxa.com;

　　beijingdingefapiao.dwcxa.com;

　　hangzhoudingefapiao.dwcxa.com;

　　ningbodingefapiao.dwcxa.com;

　　xiandingefapiao.dwcxa.com;

　　shijiazhuangdingefapiao.dwcxa.com;

　　zhengzhoudingefapiao.dwcxa.com;

　　wuhandingefapiao.dwcxa.com;

　　tianjindingefapiao.dwcxa.com;

　　taiyuandingefapiao.dwcxa.com;

　　haikoudingefapiao.dwcxa.com;

　　nanjingdingefapiao.dwcxa.com;

　　wuxidingefapiao.dwcxa.com;

　　nanchangdingefapiao.dwcxa.com;

　　kunmingdingefapiao.dwcxa.com;

　　guiyangdingefapiao.dwcxa.com;

　　lanzhoudingefapiao.dwcxa.com;

　　xiningdingefapiao.dwcxa.com;

　　hefeidingefapiao.dwcxa.com;

　　fuzhoudingefapiao.dwcxa.com;

　　xiamendingefapiao.dwcxa.com;

　　shanghaishangpinfapiao.dwcxa.com;

　　shanghaihuiwufapiao.dwcxa.com;

　　shanghaiyunshufapiao.dwcxa.com;

　　shanghaijianzhufapiao.dwcxa.com;

　　shanghaiguanggaofapiao.dwcxa.com;

　　beijingjianzhufapiao.dwcxa.com;

　　beijingshangpinfapiao.dwcxa.com;

　　guangzhoujianzhufapiao.dwcxa.com;

　　guangzhoushangpinfapiao.dwcxa.com;

　　beijingzengzhishuifapiao.dwcxa.com;

　　beijingkaizengzhishuifapiao.dwcxa.com;

　　shanghaizengzhishuifapiao.dwcxa.com;

　　shanghaikaizengzhishuifapiao.dwcxa.com;

　　shanghaidaikaizengzhishuifapiao.dwcxa.com;

　　guangzhouzengzhishuifapiao.dwcxa.com;

　　guangzhoukaizengzhishuifapiao.dwcxa.com;

　　guangzhoudaikaizengzhishuifapiao.dwcxa.com;

　　shenzhenzengzhishuifapiao.dwcxa.com;

　　shenzhenkaizengzhishuifapiao.dwcxa.com;

　　shenzhendaikaizengzhishuifapiao.dwcxa.com;

　　wuhanzengzhishuifapiao.dwcxa.com;

　　wuhankaizengzhishuifapiao.dwcxa.com;

　　wuhandaikaizengzhishuifapiao.dwcxa.com;

　　jinankaizengzhishuifapiao.dwcxa.com;

　　jinandaikaizengzhishuifapiao.dwcxa.com;

　　qingdaozengzhishuifapiao.dwcxa.com;

　　qingdaokaizengzhishuifapiao.dwcxa.com;

　　qingdaodaikaizengzhishuifapiao.dwcxa.com;

　　nanjingzengzhishuifapiao.dwcxa.com;

　　nanjingkaizengzhishuifapiao.dwcxa.com;

　　nanjingdaikaizengzhishuifapiao.dwcxa.com;

　　wuxizengzhishuifapiao.dwcxa.com;

　　wuxikaizengzhishuifapiao.dwcxa.com;

　　wuxidaikaizengzhishuifapiao.dwcxa.com;

　　suzhouzengzhishuifapiao.dwcxa.com;

　　suzhoukaizengzhishuifapiao.dwcxa.com;

　　suzhoudaikaizengzhishuifapiao.dwcxa.com;

　　shenyangzengzhishuifapiao.dwcxa.com;

　　shenyangkaizengzhishuifapiao.dwcxa.com;

　　shenyangdaikaizengzhishuifapiao.dwcxa.com;

　　指定focus在左边第一个按钮，这是默认值。

　　3.2 MB_DEFBUTTON2、MB_DEFBUTTON3、MB_DEFBUTTON4

　　以此类推，指定focus在左边第二、三、四个按钮

　　4. 可指定是否 Modal

　　4.1 MB_APPLMODAL

　　对于应用程序而言，是 modal form

　　4.2 MB_SYSTEMMODAL

　　对于操作系统而言，是 modal form

　　4.3 MB_TASKMODAL

　　对于 task 而言，是 modal form

　　一般来说，这跟 MB_APPLMODAL 是等效的，但是当应用程序中的所有

　　form 都隐藏的时候，就必须使用这个，才能达到 modal 的目的

　　5. 其它

　　5.1 MB_TOPMOST

　　将讯息窗口提至最前面

　　5.2 MB_RIGHT

　　将消息正文向右对齐

　　在一个 Flag 要指定这么多的东西，要如何使用呢?

　　只要把要用的自变量组合 or 起来就可以了。例如：

　　Application.MessageBox(PCahr(sMsg), PChar(sCap), MB_YESNO or

　　MB_ICONQUESTION or MB_DEFBUTTON2)

　　这样会出现「问号」图标，「Yes」「No」两个按钮，而且 focus 在 No 按钮上

　　回传值：

　　1. IDABORT：使用者按了「Abort」按钮

　　2. IDCANCEL：使用者按了「Cancel」按钮

　　3. IDIGNORE：使用者按了「Ignore」按钮

　　4. IDNO：使用者按了「No」按钮

　　5. IDOK：使用者按了「Ok」按钮

　　6. IDRETRY：使用者按了「Retry」按钮

　　7. IDYES：使用者按了「Yes」按钮