第四讲第三方通用控件的使用北京亚控科技有限公司45第四讲第三方通用控件的使用第一节微软提供的标准日历时间控件概述：微软提供的标准日历控件“MicrosoftDateandTimePickerControl6.0”可以提供日期、时间两种格式，通过此控件我们可以获得日期、时间、星期，这样可以与其他控件如KVADOGRID控件配合使用方便的进行以时间为条件的数据查询。主要使用到的是控件的几个属性和事件：�属性：Day、Month、Year、DayOfWeek、Hour、Minute、Second�事件：Change()、CloseUp()控件使用：点击工具箱的“插入通用控件”，选择“MicrosoftDateandTimePickerControl6.0”，如图一所示：点击“确定”后，鼠标变成十字形。然后在画面上画一个矩形框，日历控件就放到画面上了。双击画面的日历控件，为控件命名为：“ADate”。同样的方法再创建一个日历控件，双击控件为控件命名为“ATime”，选中ATime控件，点击鼠标右键，弹出快捷菜单，选择“控件属性”，弹出控件属性对话框，如图二所示：在通用选项卡中对控件的“格式”进行设置，格式有四种，我们选择“2－dtpTime”，选择完成后我们点击“确定”，ATime控件就由日期变为时间了。如图三所示：组态王的功能控件使用北京亚控科技有限公司46图一插入日历控件图二控件属性图三控件双击“ADate”控件，弹出动画连接属性，选择“事件”选项卡，如图四所示：双击“CloseUp”事件的关联函数，弹出控件事件函数编辑框，如图五所示：在函数声明处为函数命名，如“CloseUp1()”，在命令语言编辑框中编写脚本程序对选择的日期进行处理，如图七所示。第四讲第三方通用控件的使用北京亚控科技有限公司47图四控件的动画连接属性图五控件事件函数脚本程序：stringtemp;\\本站点\年=ADate.Year;\\本站点\月=ADate.Month;\\本站点\日=ADate.Day;\\本站点\周=ADate.DayOfWeek;temp=StrFromInt(\\本站点\年,10);if(\\本站点\月<10)temp=temp+"-0"+StrFromInt(\\本站点\月,10);组态王的功能控件使用北京亚控科技有限公司48elsetemp=temp+"-"+StrFromInt(\\本站点\月,10);if(\\本站点\日<10)temp=temp+"-0"+StrFromInt(\\本站点\日,10);elsetemp=temp+"-"+StrFromInt(\\本站点\日,10);\\本站点\日期=temp;if(\\本站点\周==1)\\本站点\星期="星期日";if(\\本站点\周==2)\\本站点\星期="星期一";if(\\本站点\周==3)\\本站点\星期="星期二";if(\\本站点\周==4)\\本站点\星期="星期三";if(\\本站点\周==5)\\本站点\星期="星期四";if(\\本站点\周==6)\\本站点\星期="星期五";if(\\本站点\周==7)\\本站点\星期="星期六";第四讲第三方通用控件的使用北京亚控科技有限公司49图七控件函数CloseUp1()双击“ATime”控件，弹出动画连接属性，选择“事件”选项卡，如图四所示：双击“Change”事件的关联函数，弹出控件事件函数编辑框，如图五所示：在函数声明处为函数命名，如“Change1()”，在命令语言编辑框中编写脚本程序对选择的时间进行处理，如图八所示：脚本程序如下：stringtemp;\\本站点\时=ATime.Hour;\\本站点\分=ATime.Minute;\\本站点\秒=ATime.Second;if(\\本站点\时<10)temp=StrFromInt(\\本站点\时,10);elsetemp="0"+StrFromInt(\\本站点\时,10);if(\\本站点\分<10)temp=temp+":0"+StrFromInt(\\本站点\分,10);elsetemp=temp+":"+StrFromInt(\\本站点\分,10);if(\\本站点\秒<10)temp=temp+":0"+StrFromInt(\\本站点\秒,10);组态王的功能控件使用北京亚控科技有限公司50elsetemp=temp+":"+StrFromInt(\\本站点\秒,10);\\本站点\时间=temp;图八控件函数Change1()制作画面如图九所示：动画连接分别连接对应的变量。图九日历控件画面运行画面如图十所示：图十运行系统第四讲第三方通用控件的使用北京亚控科技有限公司51第二节微软提供的标准对话框控件：概述：微软提供的标准控件“Microsoftcommondialogcontrol,version6.0”可以弹出标准的文件选择对话框。主要使用到的是控件的几个属性和方法：�属性：FileName文件名称�方法：ShowOpen()主要打开文件的时候使用�方法：ShowSave()主要保存文件的时候使用控件使用：如图所示：选择下面的控件显示如下图所示的图...
