教师信息的录入

教师信息的录入

ID:21954179

大小:521.59 KB

页数:7页

时间:2018-10-25

教师信息的录入_第1页
教师信息的录入_第2页
教师信息的录入_第3页
教师信息的录入_第4页
教师信息的录入_第5页
资源描述:

《教师信息的录入》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库

1、五、教师信息的录入教师信息录入窗口(w_teacher)继承自w_anc,窗口类型:response!%老师信息录入教师号姓名性别出生文化程度民族年龄1031dw21969年12月24日硕士蒙古族L4J101T-Q/J1973年05月28日学士1034下壁f^Ql966年07月02日学士汉族2048testT968年11月15日硕士汉族从左向右,依次为:cb_add,cb_del,cb_save,cb_print,cb_exit继承自祖先添加删除保#打印退出I教师号,屮牛住址单位电话个人电话10391979-10-19+姓名:孙不二性别:文化程度学

2、士民族:藏族邮箱:dw1继承自祖先0男②女▼注意:窗口类型需要设置为响应窗口(Response),这类窗口没有最大化、最小化按钮,窗口显示自动居中,窗口大小不可以调节等。>建立照OLE对象OLE_1。一定要在窗口上放置一个OLE控件,它的名称为0le_1,并将它的Visible设置为false,使它不可见!它只是照片文件存储到数据库中的中转站同学们可以按照自己的喜好,排列控件。cb_save的可用性设置为false。>建立教师列表数据窗口对象dw_teacher_list,应用到数据窗口控件dw_2中。>建立教师细节数据窗口对象dw_teacher

3、_detail,应用到数据窗口控件dw_l中。>由于文化程度和民族也需要数i库表的&容来维护,还需要建立2个给下拉列表使用的数据窗口对象,文化程度列表ddww_wh和民族列表ddww_mz。以上数据窗口对象的建立,详情参考录像5.11V定义实例变量(InstanceVariables)stringt_id//教师号stringls_path,ls_filename//照片文件名及路径2、窗口w_teacher的Open事件:dw_l.SetTransObject(SQLCA)dw_2.settransobject(sqlca)dw2.retriev

4、e()ifdw_2.rowcount()=0then//如果不存在教师,就没有删除和打印的必要cbdel.enabled=falsecb_print.enabled=falseelsedw_2.SelectRow(0,false)dw_2.selectrow(l,true)//选中第1位教师t_id=dw_2.GetItemString(l,〃教师号〃)//取其教师号dw_l.retrieve(t_id)//检索数据cb_del.enabled=truecb_print.enabled=trueendif3、数据窗口控件dw_2的Clicked事件

5、:ifrow=0thenreturnthis.selectrow(0,false)this.selectrow(row,true)t_id=this.getitemstring(row,”教师号’’)//取教师号dw_l.retrieve(t_id)//检索该教师的数据4、dw_1的Doubledicked事件://存图A,可以使用PB自带的函数FileReadO,但只能读32765Byte.使用OLE就不存在大小问题了!"//事先定义的实例变量ifdwo.name=’’p_photo"thenls_path=;ls_filenameGetFile

6、OpenName(”请选择照片",18_卩3也,1§」1161131116,’’*.1)111卩’’,”位图文件(*.1)111卩),*.1)111口,片文件(*.jpg),*.jpg,全部文件(*.*),*•*")Ifls.filename<>""Thenifole_l.InsertFile(ls_path)<>0thenmessagebox("提示”,"照片读取未成功!")elsesetpointer(HourGlass!)blobphoto_objectphoto_object=ole_l.objectdataUPDATEBLOB&师表SET

7、照片=:photo.objectWHERE教师号=:tjd;Commit;ifSQLCA.SQLCode=-lthenMessageBox("提示n,"照片保存失败!'Information!)returnelsecb_save.TriggerEvent(Clicked!)dw_l.retrieve(t_id)endifsetpointer(Arrow!)endifendifreturn1//因双击会激活绘图软件,Return1用来禁止绘图软件打开endif5、dw_1的ItemChanged事件://在用鼠标改变数据时,本事件被触发dw_2.en

8、abled=false//因为有数据被修改,教师列表不可用,直到保存或恢复之后,才可用!cb_save.enabled=t

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。