Javen的文档


消息对话框函数

<h3>MessageDlg</h3> <p>MessageDlg(&#039;标题&#039;, &#039;内容&#039;, &#039;类型&#039;, &#039;按钮组合&#039;, &#039;帮助上下文&#039;) 例:</p> <pre><code class="language-delphi">MessageDlg(&amp;#039;提示&amp;#039;, &amp;#039;操作成功完成!&amp;#039;, mtInformation, [mbOK], 0);</code></pre> <h5>标题、内容aCaption,aMsg:</h5> <p>标题和内容为字符串</p> <h5>对话框类型ADialogType:</h5> <ul> <li>mtWarning (警告)</li> <li>mtError (错误)</li> <li>mtInformation (信息),显示信息图标</li> <li>mtConfirmation (确认)</li> <li>mtCustom (自定义)</li> </ul> <h5>按钮组合AButtons:</h5> <ul> <li>mbYes, mbNo</li> <li>mbOK, mbCancel</li> <li>mbAbort, mbRetry, mbIgnore</li> <li>mbYesNoCancel</li> <li>mbOKCancel</li> <li>mbAbortRetryIgnore 使用方括号 [] 指定一组按钮。例:[mbYes, mbNo, mbCancel]</li> </ul> <p>处理返回值: mrNone, mrOk, mrCancel mrYes, mrNo, mrAll mrNoToAll, mrYesToAll mrClose, mrAbort, mrRetry, mrIgnore 使用 if...then 或 case...of 根据用户点击的按钮执行不同操作。</p> <p>示例: 1.简单提示:显示一个信息提示框。</p> <pre><code class="language-delphi">MessageDlg(&amp;#039;提示&amp;#039;, &amp;#039;操作成功完成!&amp;#039;, mtInformation, [mbOK], 0); </code></pre> <p>2.用户确认:显示一个带&quot;是&quot;、&quot;否&quot;按钮的确认对话框,并根据用户选择执行操作。</p> <pre><code class="language-delphi">if MessageDlg(&amp;#039;确认&amp;#039;, &amp;#039;您确定要删除这个文件吗?&amp;#039;, mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin // 用户点击了&amp;quot;是&amp;quot;,执行删除操作 DeleteFile(&amp;#039;myfile.txt&amp;#039;); end;</code></pre> <p>3.处理复杂按钮组合</p> <pre><code class="language-delphi">case MessageDlg(&amp;#039;问题&amp;#039;, &amp;#039;文件已修改,是否保存?&amp;#039;, mtConfirmation, [mbYes, mbNo, mbCancel], 0) of mrYes: begin // 用户点击&amp;quot;是&amp;quot;,执行保存操作 SaveToFile; end; mrNo: begin // 用户点击&amp;quot;否&amp;quot;,不保存继续 end; mrCancel: begin // 用户点击&amp;quot;取消&amp;quot;,中止操作 Exit; end; end;</code></pre>

页面列表

ITEM_HTML