随笔分类 -  对话框、文件、图形与多媒体篇

摘要:TReplaceDialog组件是TFindDialog类的特殊版本,提示用户查找和替换字符串,与“查找”对话框相同,替换对话框是一个无模式的windows对话框。 代码示例(窗体上添加按钮、RichEdit、ReplaceDialog): procedure TForm1.Button1Click 阅读全文
posted @ 2020-04-27 05:23 范思哲 阅读(623) 评论(0) 推荐(0)
摘要:TFindDialog组件用于显示一个查找对话框,允许用户在文件中查找文本。 1、设置“查找”对话框显示时的位置,通常打开查找对话框时,出现的位置可能会影响视觉效果,下面示例可以解决。 procedure TForm1.Button2Click(Sender: TObject); var Point 阅读全文
posted @ 2020-04-27 04:41 范思哲 阅读(382) 评论(0) 推荐(0)
摘要:TColorDialog组件用于显示选择颜色的对话框,当用户选择一个颜色并单击 OK 按钮后,所选颜色会被保存到 Color 属性中。 1、将”颜色“对话框中所选的颜色值应用到组件中示例: ColorDialog1.Execute; Memo1.Text:= ColorToString(ColorD 阅读全文
posted @ 2020-04-27 04:09 范思哲 阅读(251) 评论(0) 推荐(0)
摘要:“字体”对话框允许用户任意选择一种字体并设置字体样式,用户选择的字体包含在Font属性中,使用“字体”对话框可为任意具有Font属性的组件设置字体。 1、使用“字体”对话框设置Memo字体样式示例: procedure TForm1.Button1Click(Sender: TObject); be 阅读全文
posted @ 2020-04-27 03:51 范思哲 阅读(709) 评论(0) 推荐(0)
摘要:另存为对话框TSaveDialog类封装了Windows的”另存为“对话框,允许用户将一个文件保存到磁盘上。 TSaveDialog类是从TopenDialog类派生而来的,因此对于TOpenDialog类的所有属性、事件、方法同样都适用。 1、为保存的文件指定默认扩展名 DefaultExt属性用 阅读全文
posted @ 2020-04-27 03:26 范思哲 阅读(749) 评论(0) 推荐(0)
摘要:程序设计时,我们经常会需要打开或选择计算机上的文件,这时候就可以使用TOpenDialog组件来显示一个文件选择对话框。 1、“打开”对话框的标题设置 对话框的标题可以让用户明白对话框的意图,标题的自定义需要设置“打开”对话框的Title属性,需要注意的是,只有ofExNoPlaceBar属性为Fa 阅读全文
posted @ 2020-04-27 01:55 范思哲 阅读(1351) 评论(0) 推荐(0)