随笔 - 33  文章 - 0  评论 - 0  阅读 - 6426

(二章)随手拈来ShowMessage

ShowMessage对话框是一个非常简单而又实用的对话框,当你在程序中只需要简单表达一下提示信息时,用它是再恰当不过了。ShowMessage的语法定义如下:

procedure ShowMessage(const Msg:string);

参数Msg是string类型的,不用像MessageBox那样进行类型转换。

ShowMessage显示的对话框,它的标题是应用程序的名称,附带一个OK按钮。当然,它也可以显示多行提示文本,方法与MessageBox相同,在文本字符串的行与行之间加上换行符就OK了。

ShowMessage与MessageBox对话框只是系统提供的最简单的对话框,如果你在对话框中要加上提示与警告之类的图案,那就参考一下MessageDlg对话框。如果MessageDlg还不能满足,只有靠自己制作对话框了。其实自己制作对话框也很简单,建一个窗口,窗口中放置一些按钮、标签、图案、编辑框等,以模式窗口显示,即用窗口的ShowModal()方法显示即可。

在调试程序时,往往需要知道程序运行到某一步时的值,如果按某些书上所说的用Debug去调试,而且你不是一个Debug高手,那就慢慢调吧,也许永远也调不明白。教你一个虽笨但有效的方法,就是在程序中加入一些Showmessage,调试时,每走到某一步,会显示某一步相应参数的结果,这不是很直观吗?调试完后,将这些ShowMessage隐去就可以了。

posted on   Delphi搬运工  阅读(697)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· DeepSeek “源神”启动!「GitHub 热点速览」
· 微软正式发布.NET 10 Preview 1:开启下一代开发框架新篇章
· 我与微信审核的“相爱相杀”看个人小程序副业
· C# 集成 DeepSeek 模型实现 AI 私有化(本地部署与 API 调用教程)
· spring官宣接入deepseek,真的太香了~
< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8

点击右上角即可分享
微信分享提示