- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第十九讲上机:Open事件的理解Appliction中open(w_open)w_open窗口标题:open事件未显示的理解打开并传递按钮的clicked 事件OpenWithParm(w_selecttab,em_1.text)w_selecttab窗口open 事件This.PostEvent(‘ue_open’)自定义ue_open 事件String ls_parmls_parm = Message.StringParmif IsNumber(ls_parm) thentab_1.SelectTab(Integer(ls_parm))end iftab_1.SelectTab(index)切换到指定的Tabpage上上机:制作有屏幕保护功能的程序Idle(n)设置空闲若干秒后触发idle事件w_screensaver窗口WindowType 为response!WindowState 为最大化maximized!标题取消:TitleBar 取消勾选closequery事件return ii_close //带有返回值得事件登录cb_1按钮的clicked事件String ls_templs_temp = sle_1.textif ls_temp = ‘english’ then ii_close = 0 //允许关闭close(parent)Instance Variables 实例变量Integer ii_close = 1 //不允许关闭应用pb11learn idle事件 //idle事件是和idle相结合的,类似于timer事件和 timer函数open(w_screensaver)open 事件idle(5) //空闲5秒后触发idle事件,打开w_screensaver窗口 open(w_open)//随便打开一个窗口,这个必须有常用控件1(共39个,讲12个)Command Button用途:发布命令常用属性:Text(设置按钮上的文字,特殊符号规定按钮的快捷键A (Alt+A))、Default(一个窗口只能有一个按钮的Default属性为真,回车执行此按钮)、Cancel(按Esc,一般只有关闭或者退出按钮设置此属性,一个窗口只有1个)常用事件:ClickedStatic Text用途:显示少量提示信息常用属性:Text、字体相关Single Line Edit用途:输入少量无格式数据,接收用户输入常用属性:Text、DisplayOnly(选中时,里面的内容是可以选择的,但不允许删除、编辑)、Password(内容不明文显示,有多少个内容,就有多少个星号)、AutoHScroll(自动水平滚动,缺省为选中)常用事件:Modified(输入完内容后,回车或者焦点切换到其他控件上的时候)常用控件2TreeView用途:层次换显示数据常用属性:SortType(排序的类型)、Picture常用事件:SelectionChanged(选择不同结点时,触发事件。获取用户所点击点的相关内容,根据这个内容做检索)树的便利及递归算法常用函数:FindItem、InsertItemLast、GetItem(得到指定节点的数据)上机:创建树型结构,显示各部门的员工。目的:掌握TreeView编程,复习游标的使用。扩展练习:增加‘性别’层。应用open事件open(w_treeview)w_treeview窗口题目:TreeViewWindowState:maximized!treeview控件第二十讲树的便利ADKJNJIDCBHGFMLFEBA先找子节点,子节点没有再找兄弟节点,兄弟节点没有子节点最后找父节点tv_1.FindItem(navigationcode,handel)//相对于指定节点的什么方向上查找节点第一个参数:枚举类型(按什么方向查找)ParentTreeItem!(父节点)、NextTreeItem!(下一个兄弟节点)、ChildTreeItem!(子节点)、RootTreeItem!(根节点)第二个参数:handel long 类型(相对于哪个节点,是节点的编号,不能随便指定,是通过程序得出来的,是唯一的)例如:handel = tv_1.FindItem(navigationcode,handel)tv_1.InsertItemLast (handleparent,label,pictureindex) //插入的节点是以handleparent作为父节点的子节点,并且是父节点的最后一个子节点;label(给别人看的)是属性结构中看到此节点的文字内容;pictureindex是此节点的图片,是数值型的。tv_1.InsertItemLast (ha
文档评论(0)