如何将Grid或者ListView中的数据移动

Fxx 2006-05-29 02:55:38

在Grid或ListView中，
例如点[上移]按钮第n行数据移动到第n-1行，点[下移]第n行数据移动到第n+1行

...全文

115 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

vansoft 2006-05-30

打赏
举报

回复

a和b互換，借助t。

t=a
a=b
b=t

public bz &&定义全局变量bz=.f.this.listview1.view=2 &&设置视图显示方式 *将ImageList控件图片赋予Listview控件 this.listview1.Icons=this.imagelist1.objectthis.listview1.smallicons=this.imagelist1.object&&添加列表项key=‘小区信息生成‘=this.listview1.listitems.add(,,key,,1)key=‘大楼信息生成‘=this.listview1.listitems.add(,,key,,1)key=‘房屋信息生成‘=this.listview1.listitems.add(,,key,,1)key=‘小区信息登记‘=this.listview1.listitems.add(,,key,,1)key=‘大楼信息登记‘=this.listview1.listitems.add(,,key,,1)key=‘房屋信息登记‘=this.listview1.listitems.add(,,key,,1)key=‘系统数据设定‘=this.listview1.listitems.add(,,key,,1)在“经营部”的click事件中添加代码为：this.parent.listview1.listItems.clear &&清除数据this.parent.listview1.view=2 &&设置视图显示方式*将ImageList控件图片赋予Listview控件this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.object*添加数据项key=‘小区信息生成‘=this.parent.listview1.listitems.add(,,key,,1)key=‘大楼信息生成‘=this.parent.listview1.listitems.add(,,key,,1)key=‘房屋信息生成‘=this.parent.listview1.listitems.add(,,key,,1)key=‘小区信息登记‘=this.parent.listview1.listitems.add(,,key,,1)key=‘大楼信息登记‘=this.parent.listview1.listitems.add(,,key,,1)key=‘房屋信息登记‘=this.parent.listview1.listitems.add(,,key,,1)key=‘系统数据设定‘=this.parent.listview1.listitems.add(,,key,,1)在“管理部”的事件中添加以下代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘业主信息登记‘=this.parent.listview1.listitems.add(,,key,,2)key=‘人口信息查询‘=this.parent.listview1.listitems.add(,,key,,2)key=‘小区投诉登记‘=this.parent.listview1.listitems.add(,,key,,2)key=‘小区投诉查询‘=this.parent.listview1.listitems.add(,,key,,2)key=‘小区员工管理‘=this.parent.listview1.listitems.add(,,key,,2)key=‘系统数据设定‘=this.parent.listview1.listitems.add(,,key,,2)pjyb=.t.在“工程部”上添加代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘装修队登记‘=this.parent.listview1.listitems.add(,,key,,3)key=‘维修信息登记‘=this.parent.listview1.listitems.add(,,key,,3)key=‘维修信息查询‘=this.parent.listview1.listitems.add(,,key,,3)key=‘装修信息登记‘=this.parent.listview1.listitems.add(,,key,,3)key=‘装修信息查询‘=this.parent.listview1.listitems.add(,,key,,3)pjyb=.t.在“财务部”添加代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘收费登记管理‘=this.parent.listview1.listitems.add(,,key,,4)key=‘水费查询管理‘=this.parent.listview1.listitems.add(,,key,,4)key=‘电费查询管理‘=this.parent.listview1.listitems.add(,,key,,4)key=‘煤气费查询管理‘=this.parent.listview1.listitems.add(,,key,,4)key=‘采暖费查询管理‘=this.parent.listview1.listitems.add(,,key,,4)key=‘其它费用查询管理‘=this.parent.listview1.listitems.add(,,key,,4)pjyb=.t.在“保安部”添加代码为：这this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘保安排班管理‘=this.parent.listview1.listitems.add(,,key,,5)key=‘保安排班查询‘=this.parent.listview1.listitems.add(,,key,,5)pjyb=.t.在“经理室”添加代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘小区资源统计‘=this.parent.listview1.listitems.add(,,key,,6)key=‘业主信息查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘人口信息查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘小区投诉查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘小区员工查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘装修信息查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘维修信息查询‘=this.parent.listview1.listitems.add(,,key,,6)key=‘保安排班查询‘=this.parent.listview1.listitems.add(,,key,,6)pjyb=.t.在“系统管理”中添加代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘操作员管理‘=this.parent.listview1.listitems.add(,,key,,7)key=‘权限设置‘=this.parent.listview1.listitems.add(,,key,,7)pjyb=.t.在“帮助”中添加代码为：this.parent.listview1.listItems.clearthis.parent.listview1.view=2this.parent.listview1.Icons=this.parent.imagelist1.objectthis.parent.listview1.smallicons=this.parent.imagelist1.objectkey=‘帮助‘=this.parent.listview1.listitems.add(,,key,,8)key=‘关于本软件‘=this.parent.listview1.listitems.add(,,key,,8)pjyb=.t.在“退出”中添加代码为：quit &&退出主程序在Image1的Click事件中添加代码为：this.parent.commdl.filter=‘图片|*.bmp;*.jpg‘ &&设置过滤器this.parent.commdl.showopen &&显示打开对话框this.parent.rq.image2.picture=this.parent.commdl.filename &&显示选定文件的名字3．系统等录界面的设计在项目管理器中添加一个新的表单，名称为Admain在表单中添加一个ImageList 控件，并进行相应的管理员设置。在表单中添加一个Image控件，一个listview控件，一个ImageList控件，两个text控件，三个label控件，一个commandgroup控件。在表单中的init事件中添加代码为：public cn &&定义全局变量cn=0 &&给全局变量赋初值thisform.listview1.view=0 &&设置视图显示方式*将ImageList控件图片赋予Listview控件thisform.listview1.Icons=thisform.imagelist1.objectthisform.listview1.smallicons=thisform.imagelist1.objectselect tabpurview &&选定tabpurview工作区为当前工作区select *;from wuyemanage!tabpurview;where 权限级别=‘1‘;order by tabpurview.操作员姓名;into cursor sysglythisform.text2.value=sysgly.操作员姓名thisform.text1.value=‘‘key=alltrim(sysgly.操作员姓名) &&赋值给变量key=thisform.listview1.listitems.add(,,key,1) &&添加一个列表项select tabpurviewselect *;from wuyemanage!tabpurview;where 权限级别=‘2‘;order by tabpurview.操作员姓名;into cursor gjczydo while !EOF() &&测试当前记录指针是否在文件尾 key=alltrim(gjczy.操作员姓名) =thisform.listview1.listitems.add(,,key,2) &&添加一个列表项 skip &&相对移动记录指针enddoselect tabpurviewselect *;from wuyemanage!tabpurview;where 权限级别=‘3‘;order by tabpurview.操作员姓名;into cursor ybczydo while !EOF() &&测试当前记录指针是否在文件尾 key=alltrim(ybczy.操作员姓名) =thisform.listview1.listitems.add(,,key,3) &&添加一个列表项 skip &&相对移动记录指针enddoselect tabpurviewselect *;from wuyemanage!tabpurview;where 权限级别=‘4‘;order by tabpurview.操作员姓名;into cursor zdydo while !EOF() &&测试当前记录指针是否在文件尾 key=alltrim(zdy.操作员姓名) =thisform.listview1.listitems.add(,,key,4) &&添加一个列表项 skip &&相对移动记录指针enddo在表单的resize事件中添加代码为：purview=val(alltrim(tabpurview.权限级别)) &&根据用户选择设置权限级别pjyb=tabpurview.经营部pglb=tabpurview.管理部pgcb=tabpurview.工程部pcwb=tabpurview.财务部pbab=tabpurview.保安部pjls=tabpurview.经理室psysgl=tabpurview.系统管理manager=alltrim(thisform.text2.value)do form formfdesktop &&调入表单fdesktopthisform.release &&刷新表单在等录的click事件中添加代码为：if empty(操作员姓名) &&判断操作员字段是否为空 thisform.resize &&执行表单的Resize事件 store .t.to pjyb,pglb,pgcb,pcwb,pbab,pjls,psysgl &&给多个内存变量赋予相同的值else seek cname &&查找输入的操作员姓名 set exact on &&设置字符精确比较*判断密码是否正确 if alltrim(tabpurview.密码)!=ppassword cn=cn+1 cmessagetitle=‘系统登录‘ cmessagetext=‘密码错误，请重新输入！‘ ndialogtype=4+32 nanswer=messagebox(cmessagetext,ndialogtype,cmessagetitle) do case case nanswer=6 thisform.text1.value=‘‘ thisform.text1.setfocus &&文本框获得焦点 case nanswer=7 messagebox(‘不要乱来！‘,48,‘系统登录‘) thisform.release &&释放表单 endcase if cn=3 thisform.release endif else thisform.resize &&执行表单的Resize事件 endif endifset exact off &&设置字符非精确比较在取消的click事件中添加代码为：cmessagetitle=‘系统登录‘cmessagetext=‘真的想要退出吗？‘nDialogtype=4+32nanswer=messagebox(cMessagetext,nDialogtype,cMessagetitle)if nanswer=6 quitendif在控件listview1中的itemclick事件中添加代码为：LPARAMETERS itemmanager=alltrim(thisform.listview1.selecteditem.text)thisform.text2.value=managerthisform.text1.setfocus 这样，等录界面就完成了。4．经营部设计（1）在项目管理器中创建一个表单，名称为“小区信息生成”，在表单中添加3个label控件，2个spinner控件，1个commandgroup控件。在“开始生成”的click事件中添加代码为：cstart=thisform.spinner1.valuecend=thisform.spinner2.values=alltrim(str(cstart))e=alltrim(str(cend))cpicture=sys(5)+sys(2003)+‘imagesemptyimage.bmp‘cmessagetitle=‘小区信息生成‘cmessagetext=‘确认生成编号为 ‘+s+‘至 ‘+e+‘的小区信息吗？‘ndialogtype=4+32nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)do case case nAnswer=6 i=1 for i=cstart to cend xqno=alltrim(str(i)) select *; from databasewuyemanage!tabxqinfo; where 小区编号==xqno; into cursor lindep if reccount()=0*追加新记录 insert into tabxqinfo values(xqno,‘‘,‘‘,‘‘,0,0,0,0,0,0,‘‘,‘‘,cpicture,ctod(‘‘),ctod(‘‘)) endif endfor messagebox(‘数据保存成功！‘,48,‘小区信息生成‘) thisform.release do form form小区信息登记 &&调入表单 case nAnswer=7 thisform.spinner1.setfocusendcase在“返回主系统”中的click事件中添加代码为：thisform.release &&释放表单（2）在项目管理器中添加一个新的表单名称为“大楼信息生成器”，在表单中添加9个label控件，1个combo控件，2个spinner控件，4个text控件。说明：其编法如（1）（3）在项目管理器中新建一个表单，名称为“房屋信息生成器”，在表单中添加13个label控件，6个combo控件，1个text控件，4个spinner控件，1个commandgroup控件，1个grid控件。说明：其编法如（1）（4）在项目管理器中添加一个新的表单集包含form1,gorm2，名称为“小区信息登记”。在form1表单中添加16个label控件，13个text控件，1个edit控件，2个commandgroup控件，1个common dialog控件，1个image控件，2个command控件，在form2表单中添加1个command控件，1个grid控件。在form1中的load事件中添加代码为：public l &&定义全局变量l=.f.在form1中的activate事件中添加代码为：thisform.text1.value=tabxqinfo.小区编号 &&赋值给Text1thisform.text2.value=tabxqinfo.小区名称thisform.text3.value=tabxqinfo.负责人thisform.text4.value=tabxqinfo.小区说明thisform.text5.value=tabxqinfo.交工日期thisform.text6.value=tabxqinfo.竣工日期thisform.text7.value=tabxqinfo.地址thisform.text8.value=tabxqinfo.占地面积thisform.text9.value=tabxqinfo.建筑面积thisform.text10.value=tabxqinfo.绿化面积thisform.text11.value=tabxqinfo.居住面积thisform.text12.value=tabxqinfo.楼栋数thisform.text13.value=tabxqinfo.总户数thisform.edit1.value=tabxqinfo.备注thisform.container1.image1.picture=tabxqinfo.照片thisform.refresh在form1中的init事件中添加代码为：store l to thisform.text1.enabled,thisform.text2.enabled,thisform.text3.enabled,; thisform.text4.enabled,thisform.text5.enabled,thisform.text6.enabled,; thisform.text7.enabled,thisform.text8.enabled,thisform.text9.enabled,; thisform.text10.enabled,thisform.text11.enabled,thisform.text12.enabled,; thisform.text13.enabled,thisform.edit1.enabled,thisform.badd.enabled,; thisform.bclear.enabled &&设置控件是否有效在form1中的“添加”click事件中添加代码为：if alltrim(thisform.commandgroup1.command1.caption)=‘添加‘ thisform.commandgroup1.command1.caption=‘保存‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘取消‘ thisform.commandgroup1.command3.enabled=.f. thisform.commandgroup1.command4.enabled=.f.*设置控件有效 l=.t. thisform.init &&执行表单的Init事件 store ‘‘ to thisform.text1.value,thisform.text2.value,thisform.text3.value,; thisform.text4.value,thisform.text7.value store {//} to thisform.text5.value,thisform.text6.value store 0 to thisform.text8.value,thisform.text9.value,thisform.text10.value,; thisform.text11.value,thisform.text12.value,thisform.text13.value thisform.edit1.value=‘‘ thisform.container1.image1.picture=sys(5)+sys(2003)+‘imagesemptyimage.bmp‘ thisform.text1.setfocuselse thisform.commandgroup1.command1.caption=‘添加‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘修改‘ thisform.commandgroup1.command3.enabled=.t. thisform.commandgroup1.command4.enabled=.t.*获取输入信息 xqno=alltrim(thisform.text1.value) xqname=alltrim(thisform.text2.value) xqinfo=alltrim(thisform.text4.value) fzr=alltrim(thisform.text3.value) jiaogdate=thisform.text5.value jungdate=thisform.text6.value area=alltrim(thisform.text7.value) cmemo=alltrim(thisform.edit1.value) zdmj=thisform.text8.value jzmj=thisform.text9.value lhmj=thisform.text10.value juzmj=thisform.text11.value lds=thisform.text12.value zhs=thisform.text13.value cpicture=thisform.container1.image1.picture select *; from wuyemanage!tabxqinfo; where 小区编号==xqno; order by 小区编号; into cursor lindep if reccount()=0 insert into tabxqinfo values(xqno,xqname,xqinfo,fzr,lds,zhs,jzmj,juzmj,zdmj,; lhmj,area,cmemo,cpicture,jungdate,jiaogdate) &&追加新记录 messagebox(‘数据保存完毕！‘,48,‘操作成功！‘) else cmessagetitle=‘小区信息登记‘ cmessagetext=‘信息已修改，确定要保存吗？‘ ndialogtype=4+32 nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle) do case case nAnswer=6 update wuyemanage!tabxqinfo set 小区名称=xqname,小区说明=xqinfo,负责人=fzr,; 楼栋数=lds,总户数=zhs,建筑面积=jzmj,居住面积=juzmj,占地面积=zdmj,地址=area,; 备注=cmemo,照片=cpicture,竣工日期=jungdate,交工日期=jiaogdate,绿化面积=lhmj ; where 小区编号==xqno &&更新数据表 messagebox(‘数据保存完毕！‘,48,‘操作成功！‘) endcase endif select tabxqinfo l=.f. thisform.init &&执行表单的Init事件 thisform.activate &&执行表单的Activate事件endif在form1中的“修改”click事件中添加代码为：if alltrim(thisform.commandgroup1.command2.caption)=‘修改‘ thisform.commandgroup1.command1.caption=‘保存‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘取消‘ thisform.commandgroup1.command3.enabled=.f. thisform.commandgroup1.command4.enabled=.f. l=.t. thisform.init &&执行表单的Init事件 thisform.text1.enabled=.f. thisform.text1.setfocuselse thisform.commandgroup1.command1.caption=‘添加‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘修改‘ thisform.commandgroup1.command3.enabled=.t. thisform.commandgroup1.command4.enabled=.t. thisform.activate &&执行表单的Activate事件 l=.f. thisform.init &&执行表单的Init事件endif在form1中的“删除”click事件中添加代码为：xqnumber=alltrim(thisform.text1.value)cmessagetitle=‘小区信息登记‘cmessagetext=‘确定要删除吗？‘ndialogtype=4+32nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)if nAnswer=6 select tabxqinfo use use database/tabxqinfo exclusive &&以独占方式打开数据表 dele from tabxqinfo where 小区编号=xqnumber &&逻辑删除记录 dele from tabxqinfo where empty(小区编号) pack &&物理删除 thisform.activate &&执行表单的Activate事件 messagebox(‘删除完毕‘,48,‘操作成功！‘) use database abxqinfo thisform.refreshendif在form1中的“浏览”click事件中添加代码为：thisform.parent.form2.grid1.recordsource=‘tabxqinfo‘ &&赋数据源thisform.parent.form2.visible=.t. &&显示表单在form1中的“退出”click事件中添加代码为：thisform.release &&释放表单thisform.parent.form2.release在form1中的“追加图片”click事件中添加代码为：thisform.imagedc.filter="图片|*.bmp;*.jpg" &&设置过滤器 thisform.imagedc.showopen &&显示打开对话框thisform.Container1.image1.picture=thisform.imagedc.filename在form1中的“清除图片”click事件中添加代码为：thisform.Container1.image1.picture=sys(5)+sys(2003)+‘imagesemptyimage.bmp‘在form1中的“第一个”click事件中添加代码为：go top &&记录指针定位到第一条记录this.parent.command1.enabled=.f.this.parent.command2.enabled=.f.this.parent.command3.enabled=.t.this.parent.command4.enabled=.t.thisform.Activate &&执行表单的Activatethisform.refresh在form1中的“上一个”click事件中添加代码为： skip-1 &&把记录指针向上移一条记录 thisform.Activate &&执行表单的Activate if bof() messagebox(‘已是第一个记录‘,48,‘信息窗口‘) this.parent.command1.enabled=.f. this.parent.command2.enabled=.f. thisform.Activate &&执行表单的Activate else this.parent.command1.enabled=.t. this.parent.command2.enabled=.t. endif this.parent.command3.enabled=.t. this.parent.command4.enabled=.t.thisform.refresh在form1中的“下一个”click事件中添加代码为：if eof() messagebox(‘已经是最后一条记录‘,48,‘管理窗口‘) skip-1 &&记录指针向上移动一条记录 thisform.Activate &&执行表单的Activate this.parent.command1.enabled=.f. this.parent.command2.enabled=.f. this.parent.command3.enabled=.f. this.parent.command4.enabled=.f.else skip &&记录指针向下移一条记录 thisform.Activate &&执行表单的Activate if eof() messagebox(‘已经是最后一条记录‘,48,‘管理窗口‘) skip-1 thisform.Activate &&执行表单的Activate this.parent.command3.enabled=.f. this.parent.command4.enabled=.f. else this.parent.command3.enabled=.t. this.parent.command4.enabled=.t. endif this.parent.command1.enabled=.t. this.parent.command2.enabled=.t.endifthisform.refresh在form1中的“最后一个”click事件中添加代码为：go bottom &&记录指针移动到最后一条记录this.parent.command3.enabled=.f.this.parent.command4.enabled=.f.this.parent.command1.enabled=.t.this.parent.command2.enabled=.t.thisform.Activate &&执行表单的Activatethisform.refresh在form1中的控件edit1的keypress事件中添加代码为：LPARAMETERS nKeyCode, nShiftAltCtrlif nKeycode=3thisform.text8.setfocusendif在form1中的控件edit1的lostfocus事件中添加代码为：thisform.text8.setfocus在form2中的“退出小区信息浏览”的click事件中添加代码为：thisform.visible=.f. &&隐藏表单（5）在项目管理器中添加一个表单集包括form1,form2,form3，名称为“大楼信息登记”。在表单form1中添加2个list控件，2个label控件，1个commandgroup控件，在表单form2中添加17个label控件，12个text控件，2个combo控件，1个edit控件，1个common dialog控件，1个image控件，2个command控件，2个commandgroup控件，在表单form3中添加1个grid控件， 1个command控件。说明：其编法如以上（4）所示（6）在项目管理器中新建表单集包含form1,form2,form3,名称为“房屋信息登记”。在表单form1中添加1个commbo控件，2个list控件，2个label控件，1个commandgroup控件，在表单form2中添加19个label控件，9个text控件，8个combo控件，1个edit控件，1个commandgroup控件，在表单form3中添加1个grid控件， 1个command控件。说明：其编法如以上（4）所示（7）在项目管理器中添加一个新的表单名称为“系统数据设定”，在表单中添加一个label控件，2个commandgroup控件。在表单的“退出系统数据设定”按钮的click事件中添加代码为：thisform.release在表单的“房屋朝向设定”按钮的click事件中添加代码为：thisform.release &&释放表单do form form房屋朝向设定 &&调入表单在表单的“权限类型设定”按钮的click事件中添加代码为：thisform.release &&释放表单do form form权属类型设定 &&调入表单在表单的“小区部门设定”按钮的click事件中添加代码为：thisform.release &&释放表单do form form小区部门设定 &&调入表单在表单的“员工种类设定”按钮的click事件中添加代码为：thisform.release &&释放表单do form form员工种类设定 &&调入表单元在表单的“费用科目及费用标准设定”按钮的click事件中添加代码为：thisform.release &&释放表单do form form费用科目及费用标准设定 &&调入表单（8）在项目管理器中添加一个新的表单名称为“房屋朝向设计”，表单中添加3个label控件，1个text控件，1个grid控件，1个commandgroup控件。在表单的init事件中添加以下代码：thisform.text1.controlsource=‘tabfrontage.房屋朝向‘ &&赋数据源thisform.grid1.recordsource=‘tabfrontage‘ &&赋数据源在“添加”按钮的click事件中添加代码为：if thisform.commandgroup1.command1.caption=‘添加‘ thisform.commandgroup1.command1.caption=‘保存‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘取消‘ &&赋值给Command2的标题文本 append blank &&追加新记录 thisform.text1.value=‘‘ thisform.text1.setfocuselse thisform.commandgroup1.command1.caption=‘添加‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘删除‘ &&赋值给Command2的标题文本endifthisform.refresh &&刷新表单在“删除”按钮的click事件中添加代码为：if thisform.commandgroup1.command2.caption=‘取消‘ thisform.commandgroup1.command1.caption=‘添加‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘删除‘ &&赋值给Command2的标题文本 cx=alltrim(thisform.text1.value) select tabfrontage &&选择Tabfrontage工作区为当前工作区 use &&关闭数据表 use database/tabfrontage exclusive &&以独占方式打开数据表 dele from tabfrontage where 房屋朝向==cx &&逻辑删除记录 dele from tabfrontage where empty(房屋朝向) &&逻辑删除记录 pack &&物理删除 thisform.text1.value=tabfrontage.房屋朝向 use database abfrontage &&打开数据表 else cx=alltrim(thisform.text1.value) select tabfrontage use use database/tabfrontage exclusive &&以独占方式打开数据表 dele from tabfrontage where 房屋朝向==cx &&逻辑删除记录 dele from tabfrontage where empty(房屋朝向) &&逻辑删除记录 pack &&物理删除 thisform.text1.value=tabfrontage.房屋朝向 messagebox(‘删除完毕‘,48,‘操作成功！‘) use database abfrontage &&打开数据表 endif thisform.init &&执行表单的Init事件在text1的click事件中添加代码为：thisform.text1.controlsource=‘tabfrontage.房屋朝向‘thisform.text1.value=alltrim(thisform.grid1.column1.text1.value)(9)在项目管理器中添加一个新的表单名称为“费用科目及费用标准设定设计”，表单中添加4个label控件，2个text控件，1个grid控件，1个commandgroup控件。说明：其编法如以上（8）所示5.管理部设计（1）在项目管理器中添加一个表单集，含有form1,form2.,form3,form4,名称为“业主信息登记”在表单form1中添加1个combo控件，1个list控件，5个label控件，1个commandgroup控件，3个text控件，2个grid控件，1个command控件，1个optioguoup控件。在表单form2中添加1个grid控件， 1个command控件。在表单form3中添加24个label控件，15个text控件，3个combo控件，4个date and time picker控件，1个commandgroup控件，1个grid控件，在表单form4中添加23个label控件，13个text控件，8个combo控件，1个edit控件，1个commandgroup控件。在form1的init事件中添加以下代码：public date1,date2,date3,date4 &&定义全局变量store ctod(‘03/22/2003‘) to date1,date2,date3,date4store .f. to thisform.parent.form3.visible,thisform.parent.form4.visible &&隐藏表单thisform.grid1.columncount=1 &&指定表格的列对象的数目thisform.grid1.column1.header1.caption=‘大楼名称‘store ‘‘ to thisform.grid1.recordsource,thisform.grid1.column1.controlsource,; thisform.list1.controlsource,thisform.list1.rowsource,thisform.grid3.recordsource在form1表单的“小区名称”组合框的interactivechange事件中添加以下代码：thisform.init &&执行表单的Init事件xqname=alltrim(thisform.combo1.displayvalue)select *;from databasewuyemanage!tabdlinfo;where 所属区域==xqname;into cursor lindepingthisform.grid1.columncount=1 &&指定表格的列对象的数目thisform.grid1.column1.header1.caption=‘大楼名称‘thisform.grid1.column1.width=154thisform.grid1.recordsource=‘lindeping‘ &&赋数据源thisform.grid1.column1.controlsource=‘lindeping.大楼名称‘&&赋数据源thisform.refresh 在form1表单的“添加新业主”按钮的click事件中添加代码为：yxq=alltrim(thisform.combo1.displayvalue)ydl=alltrim(thisform.text1.value)yfw=alltrim(thisform.text2.value)if empty(yxq) or empty(ydl) or empty(yfw) messagebox(‘请选择小区名称、大楼名称和房屋编号！‘,48,‘操作失败‘)else select tabyzinfo locate for 购入房编号=yfw &&顺序查询 if found() messagebox(‘此房屋已住人！‘,48,‘业主信息登记‘) else thisform.parent.form3.visible=.t. &&显示表单 lfjno=len(yxq)+len(ydl)+1 fjno=substr(yfw,lfjno) thisform.parent.form3.text1.value=yxq thisform.parent.form3.text2.value=ydl thisform.parent.form3.text3.value=fjno thisform.parent.form3.text4.value=yfw thisform.parent.form3.text5.value=yfw store ‘‘ to thisform.parent.form3.text6.value,thisform.parent.form3.text7.value,; thisform.parent.form3.text8.value,thisform.parent.form3.text9.value,; thisform.parent.form3.text10.value,thisform.parent.form3.text11.value,; thisform.parent.form3.text12.value,thisform.parent.form3.text13.value,; thisform.parent.form3.text14.value,thisform.parent.form3.combo1.value,; thisform.parent.form3.combo2.value,thisform.parent.form3.combo3.value thisform.parent.form3.grid1.recordsource=‘‘ thisform.parent.form3.text5.setfocus &&Text5获得焦点 endifendif在form1表单的“修改业主信息”按钮的click事件中添加代码为：cvalue=alltrim(thisform.text3.value)if !empty(cvalue)thisform.parent.form3.visible=.t.public yzdh &&定义全局变量yzdh=alltrim(thisform.text3.value)select *;from wuyemanage!tabyzinfo;where 业主代号==yzdh;into cursor lxgyzinfo*赋值给Text1等thisform.parent.form3.text1.value=lxgyzinfo.小区名称thisform.parent.form3.text2.value=lxgyzinfo.大楼名称thisform.parent.form3.text3.value=lxgyzinfo.房间号码thisform.parent.form3.text4.value=lxgyzinfo.购入房编号thisform.parent.form3.text5.value=lxgyzinfo.业主代号thisform.parent.form3.text6.value=lxgyzinfo.业主姓名thisform.parent.form3.text7.value=lxgyzinfo.手机thisform.parent.form3.text8.value=lxgyzinfo.管理协议书编号thisform.parent.form3.text9.value=lxgyzinfo.电话thisform.parent.form3.text10.value=lxgyzinfo.购房合同书编号thisform.parent.form3.text11.value=lxgyzinfo.联系地址thisform.parent.form3.text12.value=lxgyzinfo.证件号thisform.parent.form3.text13.value=lxgyzinfo.单位电话thisform.parent.form3.text14.value=lxgyzinfo.工作单位thisform.parent.form3.combo1.value=lxgyzinfo.性别thisform.parent.form3.combo2.value=lxgyzinfo.是否进住thisform.parent.form3.combo3.value=lxgyzinfo.证件名*赋值给date and time picker 控件thisform.parent.form3.date1.year=year(lxgyzinfo.签约日期)thisform.parent.form3.date1.month=month(lxgyzinfo.签约日期)thisform.parent.form3.date1.day=day(lxgyzinfo.签约日期)thisform.parent.form3.date2.year=year(lxgyzinfo.进住起始日期)thisform.parent.form3.date2.month=month(lxgyzinfo.进住起始日期)thisform.parent.form3.date2.day=day(lxgyzinfo.进住起始日期)thisform.parent.form3.date3.year=year(lxgyzinfo.进住日期)thisform.parent.form3.date3.month=month(lxgyzinfo.进住日期)thisform.parent.form3.date3.day=day(lxgyzinfo.进住日期)thisform.parent.form3.date4.year=year(lxgyzinfo.进住截止日期)thisform.parent.form3.date4.month=month(lxgyzinfo.进住截止日期)thisform.parent.form3.date4.day=day(lxgyzinfo.进住截止日期)select *;from wuyemanage!tabrkinfo;where 房间编号==alltrim(thisform.parent.form3.text4.value);order by 人口编号;into cursor lincythisform.parent.form3.grid1.recordsource=‘lincy‘ &&赋数据源thisform.parent.form3.text5.setfocus &&Text5获得焦点else messagebox(‘请选择业主代号！‘,48,‘业主信息登记‘)endif在form1表单的“删除业主信息”按钮的click事件中添加代码为：yzno=alltrim(thisform.text3.value)cmessagetitle=‘业主信息登记‘cmessagetext=‘确定要删除吗？‘ndialogtype=4+32nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)if nAnswer=6 select tabyzinfo use use database/tabyzinfo exclusive &&以独占的方式打开数据表 dele from tabyzinfo where 业主代号==yzno &&逻辑删除 dele from tabyzinfo where empty(业主代号) pack &&物理删除 update wuyemanage!tabfwinfo set 房主代号=‘‘,房主姓名=‘‘,是否空闲=.t.,房屋状态=‘空闲‘ ; where 房主代号==yzno &&更新数据表 messagebox(‘删除完毕‘,48,‘操作成功！‘) use database abyzinfo thisform.optiongroup1.interactivechange &&执行Optiongroup1的Interactionchange事件 thisform.text3.value=‘‘ thisform.refreshendif在form1表单的“退出业主登记管理”按钮的click事件中添加代码为：thisform.release &&释放表单thisform.parent.form2.releasethisform.parent.form3.releasethisform.parent.form4.release在form1表单的optiongroup1选项按钮组的interactivechange事件中添加代码为：do case case thisform.optiongroup1.option1.value=1 select *; from wuyemanage!tabyzinfo; where 大楼名称==alltrim(thisform.text1.value); into cursor linall thisform.grid3.recordsource=‘linall‘ &&赋数据源 case thisform.optiongroup1.option2.value=1 select *; from wuyemanage!tabyzinfo; where 是否进住==‘已进住‘ and 大楼名称==alltrim(thisform.text1.value); into cursor liny thisform.grid3.recordsource=‘liny‘ &&赋数据源 case thisform.optiongroup1.option3.value=1 select *; from wuyemanage!tabyzinfo; where 是否进住==‘未进住‘and 大楼名称==alltrim(thisform.text1.value); into cursor linw thisform.grid3.recordsource=‘linw‘endcase在form1的“查看房屋详细信息”按钮的click事件中添加以下代码：dlname=alltrim(thisform.text1.value)if !empty(dlname) select *; from database abfwinfo; where 大楼名称==dlname; into cursor lin if reccount()=0 messagebox(‘请先生成大楼[‘+dlname+‘]的房屋信息！‘,48,‘操作失败‘) else thisform.parent.form2.grid1.recordsource=‘lin‘ &&赋数据源 endifelse thisform.parent.form2.grid1.recordsource=‘tabfwinfo‘endifthisform.parent.form2.visible=.t. &&显示表单在form1的list1控件的click事件中添加以下代码：thisform.text2.value=alltrim(thisform.list1.displayvalue)在form1的text1控件的click事件中添加以下代码：thisform.text3.value=alltrim(thisform.grid3.column1.text1.value)在form2表单的init事件中添加代码：thisform.grid1.recordsource=‘tabfwinfo‘在form2的“退出房屋信息列表”按钮的click事件中添加以下代码：thisform.visible=.f. &&隐藏表单在form3表单的init事件中添加代码：thisform.grid1.recordsource=‘‘在form3表单的load事件中添加代码：public bzcy在form3的“确定保存业主信息”按钮的click事件中添加以下代码：*获得输入信息yzdh=alltrim(thisform.text5.value)yzname=alltrim(thisform.text6.value)sex=alltrim(thisform.combo1.displayvalue)lxdz=alltrim(thisform.text11.value)sj=alltrim(thisform.text7.value)tel=alltrim(thisform.text9.value)workdw=alltrim(thisform.text14.value)dwtel=alltrim(thisform.text13.value)zjname=alltrim(thisform.combo3.displayvalue)zjnumber=alltrim(thisform.text12.value)sfjz=alltrim(thisform.combo2.displayvalue)gfhtno=alltrim(thisform.text10.value)glxysno=alltrim(thisform.text8.value)fwno=alltrim(thisform.text4.value)xqname=alltrim(thisform.text1.value)dlname=alltrim(thisform.text2.value)fjno=alltrim(thisform.text3.value)if sfjz=‘已进住‘ fwzt=‘入住‘else fwzt=‘签约‘endif*自动编号select tabrkinfoif empty(人口编号) rknumber=alltrim(‘RK00001‘)else select max(人口编号) from tabrkinfo into array a &&查找表tabrkinfo中最大的人口编号存入数组a中 cend=val(substr(a(1),3))+1 rknumber=alltrim(‘RK‘+padl(alltrim(str(cend,5)),5,‘0‘))endifif empty(yzname) or empty(gfhtno) or empty(glxysno) or empty(zjnumber) or empty(zjname) or empty(tel) messagebox(‘请将信息添全！‘,48,‘操作失败‘)else select tabyzinfo locate for 业主代号=yzdh &&顺序查询 if !found() insert into tabyzinfo values(yzdh,yzname,sex,lxdz,sj,tel,workdw,dwtel,zjname,zjnumber,; date1,date3,date2,date4,sfjz,gfhtno,glxysno,fwno,xqname,dlname,fjno) &&追加新记录 update wuyemanage!tabfwinfo set 房主代号=yzdh,房主姓名=yzname,是否空闲=.f.,; 房屋状态=fwzt where 房间编号==fwno &&更新数据表 insert into tabrkinfo values(rknumber,yzname,sex,ctod(‘‘),‘1‘,‘‘,‘户主‘,‘‘,‘‘,‘‘,workdw,‘‘,; ‘‘,‘‘,‘‘,dwtel,sj,tel,lxdz,xqname,dlname,fjno,zjnumber,‘‘,‘‘,fwno,‘‘) messagebox(‘数据保存完毕！‘,48,‘业主信息登记‘) thisform.parent.form1.grid1.column1.text1.click &&执行Text1的Click事件 thisform.visible=.f. &&隐藏表单 else update wuyemanage!tabyzinfo set 业主姓名=yzname,性别=sex,联系地址=lxdz,手机=sj,电话=tel,; 工作单位=workdw,单位电话=dwtel,证件号=zjnumber,签约日期=date1,进住日期=date3,; 进住起始日期=date2,进住截止日期=date4,是否进住=sfjz,购房合同书编号=gfhtno,; 管理协议书编号=glxysno,购入房编号=fwno,小区名称=xqname,大楼名称=dlname,; 房间号码=fjno where 业主代号==yzdh &&更新数据表 update wuyemanage!tabfwinfo set 房主代号=yzdh,房主姓名=yzname,是否空闲=.f.,; 房屋状态=fwzt where 房间编号==fwno update wuyemanage!tabrkinfo set 姓名=yzname,性别=sex,工作单位=workdw,单位电话=dwtel,; 手机=sj,传呼=tel,家庭住址=lxdz,身份证号=zjnumber where 房间编号==fwno thisform.parent.form1.grid1.column1.text1.click endifendif在form3表单的“添加成员信息”按钮的click事件中添加代码为：pfjno=alltrim(thisform.text3.value)pfjnumber=alltrim(thisform.text4.value)select *;from wuyemanage!tabrkinfo;where 房间编号==pfjnumber;order by 房间编号;into cursor lincyif reccount()=0 messagebox(‘请添加业主信息！‘,48,‘业主信息登记‘)else thisform.parent.form4.text3.value=alltrim(str(reccount()+1)) thisform.parent.form4.visible=.t. store ‘‘ to thisform.parent.form4.text1.value,thisform.parent.form4.text2.value,; thisform.parent.form4.text4.value,thisform.parent.form4.text5.value,; thisform.parent.form4.text6.value,thisform.parent.form4.text7.value,; thisform.parent.form4.text8.value,thisform.parent.form4.text9.value,; thisform.parent.form4.text10.value,thisform.parent.form4.text11.value,; thisform.parent.form4.text12.value,thisform.parent.form4.combo1.value,; thisform.parent.form4.combo2.value,thisform.parent.form4.combo3.value,; thisform.parent.form4.combo4.value,thisform.parent.form4.combo5.value,; thisform.parent.form4.combo6.value,thisform.parent.form4.combo7.value,; thisform.parent.form4.combo8.value,thisform.parent.form4.edit1.value thisform.parent.form4.text13.value={//} bzcy=.t.endifthisform.parent.form1.commandgroup1.command2.click &&执行Command2的Click事件在form3表单的“编辑成员信息”按钮的click事件中添加代码为：public pxq,pdl,pfjno,pfjnumberpxq=alltrim(thisform.text1.value)pdl=alltrim(thisform.text2.value)pfjno=alltrim(thisform.text3.value) &&定义全局变量pfjnumber=alltrim(thisform.text4.value)cvalue=alltrim(thisform.textg.value)if !empty(cvalue) thisform.parent.form4.visible=.t. cynumber=alltrim(thisform.textg.value) select *; from wuyemanage!tabrkinfo; where 人口编号==cynumber; into cursor lcyinfo thisform.parent.form4.text1.value=lcyinfo.姓名 thisform.parent.form4.text2.value=lcyinfo.职务 thisform.parent.form4.text3.value=lcyinfo.成员代号 thisform.parent.form4.text4.value=lcyinfo.身份证号 thisform.parent.form4.text5.value=lcyinfo.传呼 thisform.parent.form4.text6.value=lcyinfo.单位电话 thisform.parent.form4.text7.value=lcyinfo.家庭电话 thisform.parent.form4.text8.value=lcyinfo.暂住证号 thisform.parent.form4.text9.value=lcyinfo.手机 thisform.parent.form4.text10.value=lcyinfo.家庭住址 thisform.parent.form4.text11.value=lcyinfo.户口所在地 thisform.parent.form4.text12.value=lcyinfo.工作单位 thisform.parent.form4.text13.value=lcyinfo.出生日期 thisform.parent.form4.combo1.value=lcyinfo.性别 thisform.parent.form4.combo2.value=lcyinfo.籍贯 thisform.parent.form4.combo3.value=lcyinfo.婚姻状况 thisform.parent.form4.combo4.value=lcyinfo.职业 thisform.parent.form4.combo5.value=lcyinfo.文化程度 thisform.parent.form4.combo6.value=lcyinfo.职称 thisform.parent.form4.combo7.value=lcyinfo.与户主关系 thisform.parent.form4.combo8.value=lcyinfo.国籍 thisform.parent.form4.edit1.value=lcyinfo.备注 thisform.parent.form4.text1.setfocus &&Text1获得焦点 bzcy=.f.else messagebox(‘请选择成员名称！‘,48,‘家庭成员信息‘)endif在form3表单的“删除成员信息”按钮的click事件中添加代码为：rknumber=alltrim(thisform.textg.value)cmessagetitle=‘成员信息‘cmessagetext=‘确定要删除吗？‘ndialogtype=4+32nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)if nAnswer=6 select tabrkinfo use use database/tabrkinfo exclusive &&以独占方式打开数据表 dele from tabrkinfo where 人口编号==rknumber &&逻辑删除记录 dele from tabyzinfo where empty(人口编号) pack &&物理删除 messagebox(‘删除完毕‘,48,‘操作成功！‘) use database abrkinfo thisform.parent.form1.commandgroup1.command2.click &&执行Command2的单击事件 thisform.textg.value=‘‘ thisform.refreshendif在form3表单的“退出业主登记”按钮的click事件中添加代码为：thisform.visible=.f. &&隐藏表单在表单form3的 date1控件的init事件中添加代码为：public date1y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date1=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date1控件的change事件中添加代码为：*** ActiveX 控件事件 ***y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date1=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date2控件的change事件中添加代码为：*** ActiveX 控件事件 ***y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date2=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date2控件的init事件中添加代码为：public date2y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date2=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date3控件的change事件中添加代码为：y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date3=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date3控件的init事件中添加代码为：public date3y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date3=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date4控件的change事件中添加代码为：y=alltrim(str(this.year))m=alltrim(str(this.month))d=alltrim(str(this.day))date4=ctod(m+‘/‘+d+‘/‘+y)在表单form3的 date4控件的init事件中添加代码为：y=alltrim(str(thisform.date4.year))m=alltrim(str(thisform.date4.month))d=alltrim(str(thisform.date4.day))date4=ctod(m+‘/‘+d+‘/‘+y)在form4表单的“保存并退出”按钮的click事件中添加代码为：set exact on &&设置字符精确比较*自动编号select tabrkinfoif empty(人口编号) rknumber=alltrim(‘RK00001‘)else select max(人口编号) from tabrkinfo into array a &&查找表中最大的人口编号存入数组 cend=val(substr(a(1),3))+1 rknumber=alltrim(‘RK‘+padl(alltrim(str(cend,5)),5,‘0‘))endif*获得输入信息cname=alltrim(thisform.text1.value)zw=alltrim(thisform.text2.value)cyno=alltrim(thisform.text3.value)sfzno=alltrim(thisform.text4.value)ch=alltrim(thisform.text5.value)dwtel=alltrim(thisform.text6.value)jttel=alltrim(thisform.text7.value)cmemo=alltrim(thisform.edit1.value)zzzno=alltrim(thisform.text8.value)sj=alltrim(thisform.text9.value)area=alltrim(thisform.text10.value)hkszd=alltrim(thisform.text11.value)workdw=alltrim(thisform.text12.value)birthday=thisform.text13.valuesex=alltrim(thisform.combo1.displayvalue)jg=alltrim(thisform.combo2.displayvalue)hyzk=alltrim(thisform.combo3.displayvalue)zy=alltrim(thisform.combo4.displayvalue)whcd=alltrim(thisform.combo5.displayvalue)zc=alltrim(thisform.combo6.displayvalue)yhzgx=alltrim(thisform.combo7.displayvalue)gj=alltrim(thisform.combo8.displayvalue)if empty(cname) or empty(sex) or empty(yhzgx) or empty(area) or empty(hkszd) messagebox(‘请将信息填完整！‘,48,‘操作失败‘)else if bzcy=.t. insert into tabrkinfo values(rknumber,cname,sex,birthday,cyno,whcd,yhzgx,jg,gj,; hyzk,workdw,zy,zw,zc,jttel,dwtel,sj,ch,area,pxq,pdl,pfjno,sfzno,hkszd,zzzno,; pfjnumber,cmemo) &&追加新记录 thisform.parent.form1.commandgroup1.command2.click else cmessagetitle=‘家庭成员信息‘ cmessagetext=‘信息已修改，确定要保存吗？‘ ndialogtype=4+32 nAnswer=messagebox(cmessagetext,ndialogtype,cmessagetitle) do case case nAnswer=6 update wuyemanage!tabrkinfo set 姓名=cname,性别=sex,出生日期=birthday,成员代号=cyno,; 文化程度=whcd,与户主关系=yhzgx,籍贯=jg,国籍=gj,婚姻状况=hyzk,工作单位=workdw,职业=zy,; 职务=zw,职称=zc,家庭电话=jttel,单位电话=dwtel,手机=sj,传呼=ch,家庭住址=area,小区名称=pxq,; 大楼名称=pdl,房间号=pfjno,身份证号=sfzno,户口所在地=hkszd,暂住证号=zzzno,房间编号=pfjnumber,; 备注=cmemo where 人口编号==alltrim(thisform.parent.form3.textg.value) &&更新数据表 messagebox(‘数据保存完毕！‘,48,‘操作成功！‘) endcase endif endif thisform.visible=.f. &&隐藏表单在form4表单的“放弃并退出”按钮的click事件中添加代码为：thisform.visible=.f. &&隐藏表单(2) 在项目管理器中新建表单集包含form1,form2,名称为“小区投诉登记”。在表单form1中添加15个label控件，9个text控件，1个edit控件，4个combo控件，2个commandgroup控件，1个command控件。在表单form2中添加1个command控件，1个grid控件。说明：其编法如以上（1）所示6．工程部设计（1）在项目管理器中新建表单集包含form1,form2,名称为“装修信息登记”。在表单form1中添加15个label控件，12个text控件， 2个commandgroup控件。在表单form2中添加1个command控件，1个grid控件。在表单form1的 load事件中添加代码为：public ll=.f.在表单form1的 init事件中添加代码为：thisform.text1.enabled=l &&设置控件是否有效thisform.text2.enabled=lthisform.text3.enabled=lthisform.text4.enabled=lthisform.text5.enabled=lthisform.text6.enabled=lthisform.text7.enabled=lthisform.text8.enabled=lthisform.text9.enabled=lthisform.text10.enabled=lthisform.text11.enabled=lthisform.text12.enabled=lthisform.combo1.enabled=lthisform.edit1.enabled=l在表单form1的 activate事件中添加代码为：thisform.text1.value=tabzxinfo.编号thisform.text2.value=tabzxinfo.申请人thisform.text3.value=tabzxinfo.客户thisform.text4.value=tabzxinfo.预算thisform.text5.value=tabzxinfo.装修押金thisform.text6.value=tabzxinfo.装修管理费thisform.text7.value=tabzxinfo.罚金thisform.text8.value=tabzxinfo.验收thisform.text9.value=tabzxinfo.申请日期thisform.text10.value=tabzxinfo.退押金时间thisform.text11.value=tabzxinfo.完工日期thisform.text12.value=tabzxinfo.经办人thisform.combo1.displayvalue=tabzxinfo.装修队thisform.edit1.value=tabzxinfo.装修内容thisform.refresh &&刷新表单在form1的“添加”按钮的click事件中添加以下代码：if alltrim(thisform.commandgroup1.command1.caption)=‘添加‘ thisform.commandgroup1.command1.caption=‘保存‘ &&赋值给Command1的标题文本 thisform.commandgroup1.command2.caption=‘取消‘ thisform.commandgroup1.command3.enabled=.f. thisform.commandgroup1.command4.enabled=.f. l=.t. thisform.init &&执行表单的Init事件 thisform.text1.enabled=.f.*自动编号 select tabzxinfo if empty(编号) zxno=alltrim(‘ZX00001‘) else select max(编号) from tabzxinfo into array a &&查找表中最大的编号存入数组 cend=val(substr(a(1),3))+1 zxno=alltrim(‘ZX‘+padl(alltrim(str(cend,5)),5,‘0‘)) endif thisform.text1.value=zxno store 0 to thisform.text4.value,thisform.text5.value,; thisform.text7.value,thisform.text6.value store ‘‘ to thisform.text3.value,thisform.text2.value,thisform.text12.value,; thisform.text8.value,thisform.combo1.value,thisform.edit1.value store {//} to thisform.text9.value,thisform.text10.value,thisform.text11.value thisform.combo1.setfocuselse thisform.commandgroup1.command1.caption=‘添加‘ thisform.commandgroup1.command2.capti

另外ListView还有一个非常神奇的功能，我相信大家应该都体验过，即使在ListView中加载非常非常多的数据，比如达到成百上千条甚至更多， ListView都不会发生OOM或者崩溃，而且随着我们手指滑动来浏览更多数据时，...

01 , 01.txt 《 VB6.0中通过MSChart控件调用数据库》 02 , 02.txt 《用VB6实现动态增减控件》 03 , 03.txt ActiveX控件的创建 04 , 04.txt ADO控件和DATA控件的冲突（不能共存）的解决方法 05 , 05.txt Combo的自动查询技术 06 , 06.txt DirectX7.0使用心得（1） 07 , 07.txt DirectX7.0使用心得（2） 08 , 08.txt DirectX7.0使用心得（3） 09 , 09.txt FSO对象模型在VB中的应用 10 , 10.txt MsComm 控件的文字传输范例 11 , 11.txt Office或IE4风格的ToolBar 12 , 12.txt Regsvr32.exe注册控件的具体用法 13 , 13.txt TextBox的自动调节 14 , 14.txt TextBox实现打印机效果 15 , 15.txt TreeView的基本操作 16 , 16.txt VB5中DBGRID控件在VB6中使用 17 , 17.txt VB6.0动态加载ActiveX控件漫谈 18 , 18.txt VB与MS-Draw开发通用作图软件 19 , 19.txt VB中APP对象及其应用 20 , 20.txt VB中list控件的功能扩充 21 , 21.txt VB中防止将重复项目添加到列表框控件中 22 , 22.txt VB中用Multimedia MCI控件开发多媒体应用 23 , 23.txt Win Api在VB中的妙用 24 , 24.txt WINDOWS SCRIPT HOST对象在VB中的使用 25 , 25.txt 安装向导生成程序组并建立多个程序项 26 , 26.txt 保存复选框选项 27 , 27.txt 不用OCX来创建自己的控件（一） 28 , 28.txt 成组更新控件属性 29 , 29.txt 创建数据驱动窗体 30 , 30.txt 得到鼠标位置 31 , 31.txt 调整 Combo 下拉部分的宽度 32 , 32.txt 动态加入控件到VB控件数组中 33 , 33.txt 对ListView中的列排序 34 , 34.txt 放一个Combo到Toolbar中 35 , 35.txt 改变 ListIndex而不发生 Click 事

Ex4.0共2个压缩包特性，《ext js权威指南》前　言第1章　ext js 4开发入门 / 1 1.1　学习ext js必需的基础知识 / 1 1.2　json概述 / 3 1.2.1　认识json / 3 1.2.2　json的结构 / 3 1.2.3　json的例子 / 4 1.2.4　在javascript中使用json / 4 1.2.5　在.net中使用json / 8 1.2.6　在java中使用json / 12 1.2.7　更多有关json的信息 / 15 1.3　ext js 4概述 / 15 1.4　ext js的开发工具的获取、安装与配置介绍 / 18 1.4.1　ext designer / 18 1.4.2　在visual studio中实现智能提示 / 23 1.4.3　spket / 28 1.4.4　在eclipse中实现智能提示 / 32 1.5　如何获得帮助 / 32 1.6　本章小结 / 33 .第2章　从“hello world”开始 / 34 2.1　获取ext js 4 / 34 2.2　配置使用ext js库 / 35 2.3　编写“hello world”程序 / 37 2.4　关于ext.onready / 38 2.5　关于ext.blank_image_url / 40 2.6　关于字体 / 42 2.7　ext js 4语法 / 42 2.8　本地化 / 60 2.9　为本书示例准备一个模板 / 60 2.10　本章小结 / 61 第3章　调试工具及技巧 / 62 3.1　使用firebug进行调试 / 62 3.2　在ie中调试 / 76 3.2.1　使用debugbar和companion.js调试 / 76 3.2.2　使用ietester测试 / 80 3.2.3　在ie 8或ie 9中调试 / 83 3.3　在chrome中调试 / 84 3.4　调试工具的总结 / 84 3.5　调试技巧 / 85 3.6　本章小结 / 89 第4章　ext js的基础架构 / 90 4.1　ext js框架的命名空间：ext / 90 4.1.1　概述 / 90 4.1.2　apply和applyif方法 / 90 4.1.3　不推荐的extend方法 / 92 4.1.4　数据及其类型检测 / 95 4.1.5　其他的基础方法 / 99 4.2　为框架顺利运行提供支持 / 107 4.2.1　平台检测工具：ext.is / 107 4.2.2　当前运行环境检测工具：ext.supports / 109 4.3　ext js的静态方法 / 112 4.3.1　概述 / 112 4.3.2　ext.object中的静态方法 / 113 4.3.3　ext.function中的静态方法 / 120 4.3.4　ext.array中的静态方法 / 127 4.3.5　ext.error中的静态方法 / 133 4.4　深入了解类的创建及管理 / 135 4.4.1　开始创建类 / 135 4.4.2　创建类的类：ext.class / 137 4.4.3　所有继承类的基类：ext.base / 151 4.4.4　实现动态加载：ext.loader / 151 4.4.5　管理类的类：ext.classmanager / 159 4.4.6　类创建的总结 / 161 4.5　动态加载的路径设置 / 163 4.6　综合实例：页面计算器 / 165 4.7　本章小结 / 169 第5章　ext js的事件及其应用 / 170 5.1　概述 / 170 5.2　浏览器事件 / 170 5.2.1　绑定浏览器事件的过程：ext.eventmanager / 170 5.2.2　封装浏览器事件：ext.eventobject / 179 5.2.3　移除浏览器事件 / 181 5.3　内部事件 / 184 5.3.1　内部事件对象：ext.util.event / 184 5.3.2　为组件添加事件接口：ext.util.observable / 188 5.3.3　为组件绑定事件 / 189 5.3.4　内部事件的触发过程 / 192 5.3.5　移除事件 / 194 5.4　特定功能的事件对象 / 196 5.4.1　延时任务：ext.util.delayedtask / 196 5.4.2　一般任务：ext.util.taskrunner与ext.taskmanager / 198 5.4.3　封装好的单击事件：ext.util.clickrepeater / 200 5.5　键盘事件 / 201 5.5.1　为元素绑定键盘事件：ext.util.keymap / 201 5.5.2　键盘导航：ext.util.keynav / 204 5.6　综合实例：股票数据的实时更新 / 205 5.7　本章小结 / 214 第6章　选择器与dom操作 / 215 6.1　ext js的选择器：ext.domquery / 215 6.1.1　选择器的作用 / 215 6.1.2　使用ext.query选择页面元素 / 215 6.1.3　基本选择符 / 223 6.1.4　属性选择符 / 229 6.1.5　css属性值选择符 / 234 6.1.6　伪类选择符 / 235 6.1.7　扩展选择器 / 248 6.1.8　ext.domquery的使用方法 / 249 6.1.9　ext js选择器的总结 / 252 6.2　获取单一元素：ext.dom.element / 252 6.2.1　从错误开始 / 252 6.2.2　使用ext.get获取元素 / 253 6.2.3　使用ext.fly获取元素 / 256 6.2.4　使用ext.getdom获取元素 / 257 6.2.5　获取元素的总结 / 258 6.3　元素生成器：ext.dom.helper / 258 6.3.1　概述 / 258 6.3.2　使用createhtml或markup方法生成html代码 / 258 6.3.3　使用createdom方法生成dom对象 / 261 6.3.4　使用createtemplate方法创建模板 / 263 6.3.5　helper对象的使用方法 / 263 6.4　元素的操作 / 273 6.5　获取元素集合：ext.compositeelementlite与ext.compositeelement / 277 6.5.1　使用ext.select获取元素集合 / 277 6.5.2　ext.dom.compositeelement与ext.dom.compositeelementlite的区别 / 279 6.5.3　操作元素集合 / 279 6.6　综合实例：可折叠的面板accordion / 280 6.7　本章小结 / 283 第7章　数据交互 / 284 7.1　数据交互基础 / 284 7.1.1　ajax概述 / 284 7.1.2　封装ajax：ext.data.connection与ext.ajax / 284 7.1.3　使用ajax / 291 7.1.4　跨域获取数据：ext.data.jsonp / 295 7.1.5　为element对象提供加载功能：ext.elementloader / 295 7.1.6　为组件提供加载功能：ext.componentloader / 296 7.2　代理 / 299 7.2.1　代理概述 / 299 7.2.2　基本的代理：ext.data.proxy.proxy / 300 7.2.3　进行批量操作：ext.data.batch与ext.data.operation / 303 7.2.4　服务器端代理：ext.data.proxy.server / 305 7.2.5　使用ajax处理数据的代理：ext.data.proxy.ajax与ext.data.proxy.rest / 308 7.2.6　跨域处理数据的代理：ext.data.proxy.jsonp / 312 7.2.7　为ext.direct服务的代理：ext.data.proxy.direct / 312 7.2.8　客户端代理：ext.data.proxy.client / 314 7.2.9　从变量中提取数据的代理：ext.data.proxy.memory / 314 7.2.10　使用浏览器存储的代理：ext.data.webstorageproxy、ext.data. sessionstorageproxy和ext.data.proxy.localstorage / 314 7.3　读取和格式化数据 / 315 7.3.1　概述 / 315 7.3.2　数据的转换过程：ext.data.reader.xml、ext.data.reader.json和ext.data.reader.array / 315 7.3.3　reader对象的配置项 / 321 7.3.4　格式化提交数据：ext.data.writer.writer、ext.data.writer.json和ext.data. writer.xml / 322 7.3.5　writer对象的配置项 / 325 7.4　数据模型 / 326 7.4.1　概述 / 326 7.4.2　数据类型及排序类型：ext.data.types与ext.data.sorttypes / 326 7.4.3　数据模型的骨架——字段：ext.data.field / 330 7.4.4　数据集：ext.util.abstractmixedcollection与ext.util.mixedcollection / 330 7.4.5　数据验证及错误处理：ext.data.validations与ext.data.errors / 332 7.4.6　模型的关系：ext.data.association、ext.data.hasmanyassociation和ext.data.belongstoassociation / 334 7.4.7　管理数据模型：ext.abstractmanager与ext.modelmanager / 336 7.4.8　定义数据模型：ext.data.model / 336 7.4.9　数据模型的定义过程 / 337 7.4.10　数据模型的创建 / 340 7.4.11　数据模型的配置项、属性和方法 / 343 7.5　store / 344 7.5.1　概述 / 344 7.5.2　store对象的实例化过程 / 345 7.5.3　treestore对象的实例化过程 / 348 7.5.4　ext.data.store加载数据的方法 / 350 7.5.5　ext.data.treestore加载数据的方法 / 354 7.5.6　store的配置项 / 358 7.5.7　store的分页 / 359 7.5.8　store的排序：ext.util.sorter与ext.util.sortable / 360 7.5.9　store的过滤：ext.util.filter / 363 7.5.10　store的分组：ext.util.grouper / 363 7.5.11　树节点：ext.data.nodeinterface与ext.data.tree / 364 7.5.12　store的方法 / 366 7.5.13　store的事件 / 368 7.5.14　store管理器：ext.data.storemanager / 369 7.6　综合实例 / 369 7.6.1　远程读取json数据 / 369 7.6.2　读取xml数据 / 378 7.6.3　store的数据操作 / 379 7.7　本章小结 / 384 第8章　模板与组件基础 / 385 8.1　模板 / 385 8.1.1　模板概述 / 385 8.1.2　ext.template的创建与编译 / 385 8.1.3　格式化输出数据：ext.string、ext.number、ext.date和ext.util.format / 389 8.1.4　超级模板：ext.xtemplate（包括ext.xtemplateparser和ext.xtemplatecompiler） / 393 8.1.5　模板的方法 / 396 8.2　组件的基础知识 / 396 8.2.1　概述 / 396 8.2.2　组件类的整体架构 / 397 8.2.3　布局类的整体架构 / 402 8.2.4　组件的创建流程 / 403 8.2.5　常用的组件配置项、属性、方法和事件 / 415 8.3　为组件添加功能 / 418 8.3.1　为元素添加阴影：ext.shadow与ext.shadowpool / 418 8.3.2　为组件提供阴影和shim功能：ext.layer / 419 8.3.3　让组件实现浮动功能：ext.util.floating / 420 8.3.4　记录组件状态：ext.state.stateful / 420 8.3.5　实现调整大小功能：ext.resizer.resizer与ext.resizer.resizetracker / 420 8.3.6　为组件提供拖动功能：ext.util.componentdragger / 421 8.3.7　为组件实现动画功能：ext.util.animate / 422 8.3.8　其他的组件辅助功能类 / 423 8.4　组件的管理 / 423 8.4.1　组件管理及查询：ext.componentmanager与ext.componentquery / 423 8.4.2　焦点管理：ext.focusmanager / 424 8.4.3　z-order管理：ext.zindexmanager与ext.windowmanager / 425 8.4.4　状态管理：ext.state.manager、ext.state.provider、ext.state.local-storageprovider和ext.state.cookieprovider / 426 8.5　综合实例 / 426 8.5.1　使用子模板 / 426 8.5.2　递归调用模板 / 428 8.6　本章小结 / 429 第9章　容器、面板、布局和视图 / 430 9.1　容器与布局的关系 / 430 9.2　容器 / 431 9.2.1　容器的创建过程：ext.container.abstractcontainer与ext.container.container / 431 9.2.2　 ext.container.abstractcontainer和ext.container.container的配置项、属性、方法和事件 / 434 9.2.3　将body元素作为容器：ext.container.viewport / 435 9.3　面板 / 436 9.3.1　面板的结构 / 436 9.3.2　构件的放置：dockeditems / 438 9.3.3　面板标题栏构件：ext.panel.header与ext.panel.tool / 438 9.3.4　记录和恢复面板属性：ext.util.memento / 439 9.3.5　面板常用的配置项、方法和事件 / 439 9.4　布局 / 441 9.4.1　布局概述 / 441 9.4.2　布局的运行流程：ext.layout.layout / 441 9.4.3　容器类布局基类：ext.layout.container.container / 442 9.4.4　盒子布局、垂直布局与水平布局：ext.layout.container.box、ext.layout.container.vbox与ext.layout.container.hbox / 442 9.4.5　为盒子模型提供调整大小的功能：ext.resizer.splitter / 445 9.4.6　手风琴布局：ext.layout.container.accordion / 447 9.4.7　锚固布局：ext.layout.container.anchor / 448 9.4.8　绝对定位布局：ext.layout.container.absolute / 450 9.4.9　边框布局：ext.layout.container.border / 451 9.4.10　自动布局：ext.layout.container.auto / 453 9.4.11　表格布局：ext.layout.container.table / 454 9.4.12　列布局：ext.layout.container.column / 455 9.4.13　自适应布局：ext.layout.container.abstractfit与ext.layout.container.fit / 456 9.4.14　卡片布局：ext.layout.container.abstractcard与ext.layout.container.card / 456 9.5　标签面板 / 458 9.5.1　标签面板的构成及其运行流程：ext.tab.panel、ext.tab.bar与ext.tab.tab / 458 9.5.2　标签面板的配置项、属性、方法和事件 / 462 9.5.3　使用标签页 / 463 9.5.4　可重用的标签页 / 465 9.6　视图与选择模型 / 465 9.6.1　视图与选择模型概述 / 465 9.6.2　视图的运行流程：ext.view.abstractview与ext.view.view / 466 9.6.3　选择模型的工作流程 / 475 9.6.4　选择模型的配置项、属性、方法和事件 / 480 9.6.5　视图的配置项、属性、方法和事件 / 482 9.6.6　使用视图 / 484 9.7　页面布局设计 / 491 9.8　综合实例 / 492 9.8.1　布局设计实例：仿eclipse界面 / 492 9.8.2　在单页面应用中使用卡片布局实现“页面”切换 / 496 9.9　本章小结 / 498 第10章　重构后的grid / 500 10.1　grid的基类及其构成 / 500 10.1.1　概述 / 500 10.1.2　表格面板的运行流程：ext.panel.table / 500 10.1.3　表格视图的运行流程：ext.view.table与ext.view.tablechunker / 505 10.1.4　列标题容器的运行流程：ext.grid.header.container / 508 10.1.5　列标题的运行流程：ext.grid.column.column / 510 10.1.6　虚拟滚动条的工作原理：ext.grid.pagingscroller / 511 10.1.7　锁定列的运行流程：ext.grid.lockable与ext.grid.lockingview / 516 10.2　使用grid / 520 10.2.1　最简单的grid / 520 10.2.2　列的配置项 / 521 10.2.3　自定义单元格的显示格式 / 523 10.2.4　通过列对象定义单元格的显示格式 / 525 10.2.5　设置行的背景颜色 / 532 10.2.6　列标题的分组 / 533 10.2.7　使用锁定列 / 534 10.2.8　grid的配置项、属性、方法和事件 / 535 10.3　grid的附加功能 / 537 10.3.1　概述 / 537 10.3.2　附加功能基类：ext.grid.featrue.featrue / 537 10.3.3　为行添加附加信息：ext.grid.featrue.rowbody / 538 10.3.4　数据汇总功能：ext.grid.featrue.abstractsummary与ext.grid.featrue. summary / 539 10.3.5　分组功能：ext.grid.featrue.grouping / 543 10.3.6　分组汇总功能：ext.grid.featrue.groupingsummary / 545 10.4　可编辑的grid / 546 10.4.1　概述 / 546 10.4.2　grid实现可编辑功能的运行流程：ext.grid.plugin.editing / 547 10.4.3　单元格编辑的运行流程：ext.grid.plugin.cellediting、ext.grid.celleditor与ext.editor / 550 10.4.4　行编辑的运行流程：ext.grid.plugin.rowediting与ext.grid.roweditor / 556 10.4.5　在grid中使用单元格编辑模式 / 561 10.4.6　在grid中使用行编辑模式 / 562 10.4.7　grid编辑插件的配置项、属性、方法和事件 / 563 10.5　关于列表视图：listview / 564 10.6　属性grid / 564 10.6.1　概述 / 564 10.6.2　使用属性grid / 564 10.6.3　自定义编辑组件 / 565 10.6.4　propertygrid的配置项、属性、方法和事件 / 566 10.7　综合实例 / 567 10.7.1　使用不同选择模型的grid以及设置默认选择行 / 567 10.7.2　grid的本地排序和过滤 / 569 10.7.3　使用分页工具条（pagingtoolbar）实现远程分页、排序和过滤 / 570 10.7.4　使用分页滚动条（pagingscroller）实现远程分页、排序和过滤 / 574 10.7.5　使用cellediting实现数据的增删改 / 578 10.7.6　使用rowediting实现数据的增删改 / 587 10.7.7　主从表的显示 / 589 10.8　本章小结 / 595 第11章　与grid同源的树 / 597 11.1　树的构成 / 597 11.1.1　概述 / 597 11.1.2　树面板的运行流程：ext.tree.panel / 597 11.1.3　treestore的运行流程：ext.data.treestore / 600 11.1.4　treecolumn的运行流程：ext.tree.column / 602 11.1.5　视图的运行流程：ext.tree.view与ext.data.nodestore / 602 11.1.6　树的选择模型：ext.selection.treemodel / 603 11.2　树的使用 / 603 11.2.1　一个最简单的树 / 603 11.2.2　树节点的默认字段 / 603 11.2.3　为树节点添加附加字段 / 604 11.2.4　显示多列数据（treegrid效果） / 605 11.2.5　在树中使用复选框 / 605 11.2.6　树的配置项、属性、方法和事件 / 607 11.3　综合实例 / 608 11.3.1　树的远程加载 / 608 11.3.2　树的动态加载及节点维护 / 610 11.3.3　xml树及节点维护 / 617 11.3.4　使用树动态控制grid的显示 / 622 11.4　本章小结 / 625 第12章　表单 / 626 12.1　表单的构成及操作 / 626 12.1.1　表单面板的运行流程：ext.form.panel与ext.form.fieldancestor / 626 12.1.2　表单面板的配置项、属性、方法和事件 / 628 12.1.3　表单的管理：ext.form.basic / 629 12.1.4　basicform的配置项、属性、方法和事件 / 635 12.1.5　表单的操作：ext.form.action.action / 636 12.1.6　加载操作的运行流程：ext.form.action.load与ext.form.action.directload / 637 12.1.7　提交操作的运行流程：ext.form.action.submit、ext.form.action.directsubmit与ext.form.action.standardsubmit / 641 12.1.8　字段的构成 / 643 12.1.9　basefield的配置项、属性、方法和事件 / 643 12.1.10　常用的验证函数：ext.form.field.vtypes / 647 12.2　使用字段 / 647 12.3　使用trigger类字段 / 664 12.3.1　具有单击功能的字段：ext.form.field.trigger / 664 12.3.2　实现微调功能的spinner字段 / 665 12.3.3　使用numberfield字段 / 666 12.3.4　下拉选择类字段的基类：ext.form.field.picker / 667 12.3.5　使用datefield字段 / 667 12.3.6　使用timefield字段 / 669 12.4　使用combobox字段 / 669 12.4.1　概述 / 669 12.4.2　boundlist对象的运行流程 / 670 12.4.3　combobox字段的配置项、属性、方法和事件 / 671 12.4.4　最简单的combobox / 672 12.4.5　自定义列表显示格式的combobox / 673 12.4.6　动态调整combobox的列表数据 / 674 12.4.7　实现combobox的联动 / 676 12.4.8　使用combobox的查询功能 / 684 12.4.9　设置combobox的默认值 / 688 12.5　表单的验证和加载数据 / 690 12.5.1　表单的验证及错误显示方式 / 690 12.5.2　为表单加载数据 / 695 12.6　在表单中使用布局 / 701 12.6.1　分列显示表单的字段 / 701 12.6.2　使用fieldset作为列容器 / 703 12.6.3　使用两列布局加htmleditor的表单 / 704 12.6.4　在表单中使用标签页 / 705 12.7　综合实例：实现products表的管理功能 / 706 12.8　本章小结 / 715 第13章　窗口 / 716 13.1　窗口：ext.window.window. / 716 13.1.1　窗口的构成 / 716 13.1.2　窗口的配置项、属性、方法和事件 / 716 13.1.3　使用窗口 / 718 13.1.4　在窗口内使用布局 / 719 13.2　信息提示窗口：ext.window.messagebox / 720 13.2.1　概述 / 720 13.2.2　信息提示窗口的构成 / 720 13.2.3　使用信息提示窗口 / 722 13.2.4　信息提示窗口按钮的本地化 / 723 13.2.5　使用alert方法 / 724 13.2.6　使用confirm方法 / 724 13.2.7　使用progress方法 / 725 13.2.8　使用prompt方法 / 726 13.2.9　使用wait方法 / 727 13.2.10　使用信息提示窗口要注意的问题 / 727 13.3　综合实例：实现登录窗口 / 729 13.4　本章小结 / 733 第14章　按钮、菜单与工具条 / 734 14.1　按钮 / 734 14.1.1　按钮的构成：ext.button.button / 734 14.1.2　按钮的配置项、属性、方法和事件 / 734 14.1.3　使用按钮 / 736 14.1.4　带分割线的按钮：ext.button.split / 737 14.1.5　多状态按钮：ext.button.cycle / 737 14.1.6　按钮组：ext.container.buttongroup / 738 14.2　菜单及菜单项 / 739 14.2.1　ext js的菜单（menu对象）是什么 / 739 14.2.2　菜单管理器：ext.menu.manager / 740 14.2.3　菜单项：ext.menu.item / 740 14.2.4　可复选的菜单项：ext.menu.checkitem / 741 14.2.5　菜单分隔条：ext.menu.separator / 741 14.2.6　颜色选择器菜单：ext.menu.colorpicker / 742 14.2.7　日期选择菜单：ext.menu.datepicker / 742 14.2.8　使用菜单 / 742 14.3　工具栏及工具栏组件 / 743 14.3.1　工具栏：ext.toolbar.toolbar / 743 14.3.2　非交互式工具栏条目的基类：ext.toolbar.item / 743 14.3.3　文本项：ext.toolbar.textitem / 744 14.3.4　填充项：ext.toolbar.fill / 744 14.3.5　工具栏分隔条：ext.toolbar.separator / 744 14.3.6　空白项：ext.toolbar.spacer / 744 14.3.7　分页工具栏：ext.toolbar.paging / 744 14.3.8　使用工具栏 / 747 14.4　使用ext.action / 747 14.4.1　概述 / 747 14.4.2　action对象配置项和方法 / 748 14.4.3　使用示例 / 748 14.5　综合实例：在grid中使用右键菜单 / 750 14.6　本章小结 / 752 第15章　图形与图表 / 753 15.1　基础知识 / 753 15.1.1　svg简介 / 753 15.1.2　vml简介 / 754 15.2　图形介绍 / 755 15.2.1　概述 / 755 15.2.2　画布的工作流程：ext.draw.component / 755 15.2.3　图形引擎及接口：ext.draw.surface、ext.draw.engine.svg和ext.draw.engine.vml / 757 15.2.4　画笔：ext.draw.sprite / 760 15.2.5　图层：ext.draw.compositesprite / 760 15.2.6　调色板：ext.draw.color / 760 15.2.7　辅助对象：ext.draw.draw与ext.draw.matrix / 760 15.3　使用图形功能 / 760 15.3.1　简单的开始 / 760 15.3.2　drawcomponent对象的配置项、属性、方法和事件 / 761 15.3.3　surface对象的配置项、属性、方法和事件 / 761 15.3.4　drawsprite对象的配置项、属性、方法和事件 / 762 15.3.5　compositesprite对象的配置项、属性、方法和事件 / 763 15.3.6　使用基本图形 / 764 15.3.7　使用图片 / 765 15.3.8　使用路径 / 766 15.3.9　移动、旋转和缩放图形 / 767 15.3.10　使用渐变效果 / 770 15.3.11　使用图层 / 771 15.4　图表介绍 / 772 15.4.1　概述 / 772 15.4.2　图表的工作流程 / 773 15.5　使用图表 / 776 15.5.1　从一个简单例子开始 / 776 15.5.2　坐标轴的配置项 / 777 15.5.3　series对象的配置项、属性、方法和事件 / 779 15.5.4　折线图的配置项 / 780 15.5.5　显示多个折线图及使用图例 / 782 15.5.6　使用面积图 / 783 15.5.7　简单条形图（bar和column chart）及使用标签（label对象） / 785 15.5.8　堆积条形图 / 787 15.5.9　分组条形图 / 788 15.5.10　自定义条形颜色 / 789 15.5.11　使用散点图 / 789 15.5.12　使用饼图 / 791 15.5.13　自定义饼块颜色 / 792 15.5.14　使用表盘图 / 792 15.5.15　使用雷达图 / 795 15.5.16　使用时间轴 / 796 15.5.17　实现实时动态的图表 / 797 15.5.18　使用组合图 / 800 15.5.19　在图表中使用背景 / 801 15.5.20　在图表中自定义主题 / 803 15.6　本章小结 / 805 第16章　其他组件及实用功能 / 806 16.1　其他组件 / 806 16.2　使用滑块 / 812 16.3　使用提示信息 / 814 16.4　实用功能 / 822 16.5　本章小结 / 826 第17章　可简化通信的ext.direct / 827 17.1　准备工作 / 827 17.2　ext.direct的工作原理及构成 / 827 17.2.1　工作原理 / 827 17.2.2　ext.direct的构成 / 828 17.2.3　remotingprovider对象的具体工作流程 / 829 17.2.4　pollingprovider对象的具体工作流程 / 838 17.3　配置ext.direct的使用环境 / 839 17.3.1　概述 / 839 17.3.2　.net环境的配置 / 839 17.3.3　java环境的配置 / 842 17.4　使用ext.direct / 846 17.4.1　概述 / 846 17.4.2　使用directproxy及进行curd操作 / 846 17.4.3　使用ext.direct实现树的动态加载及节点维护 / 854 17.4.4　使用directload为表单加载数据 / 858 17.4.5　使用directsubmit提交表单及使用session / 863 17.4.6　使用ext.direct上传文件 / 866 17.4.7　使用pollingprovider对象 / 868 17.4.8　错误处理 / 871 17.5　本章小结 / 872 第18章　动画功能 / 873 18.1　动画功能的构成及工作流程 / 873 18.1.1　概述 / 873 18.1.2　动画功能的工作流程：ext.fx.anim / 874 18.1.3　分步动画的工作流程：ext.fx.animator / 877 18.2　使用动画 / 880 18.2.1　由最简单的动画开始 / 880 18.2.2　过渡效果使用的功能函数介绍 / 880 18.2.3　使用分步动画 / 882 18.2.4　注意的问题 / 883 18.3　在element对象中使用动画 / 883 18.4　本章小结 / 888 第19章　拖放功能 / 889 19.1　拖放功能的构成及工作流程 / 889 19.1.1　概述 / 889 19.1.2　dragdropmanager对象的工作流程 / 891 19.1.3　注册节点：ext.dd.registry / 893 19.1.4　一般拖动功能的工作流程：ext.dd.dd / 894 19.1.5　dragsource对象的工作流程 / 897 19.1.6　droptarget对象的工作流程 / 898 19.1.7　dragzone对象的工作流程 / 899 19.1.8　dropzone对象的工作流程 / 899 19.2　使用拖放功能 / 899 19.2.1　最简单的拖动效果 / 899 19.2.2　使用dragsource对象与droptarget对象 / 900 19.2.3　使用dragzone对象与dropzone对象（使用registry对象） / 902 19.2.4　使用dragzone对象与dropzone对象（不使用registry对象） / 903 19.2.5　通过拖动实现节点排序 / 904 19.2.6　使用gridviewdropzoneplugin插件 / 905 19.2.7　使用treeviewdragdropplugin插件 / 907 19.2.8　关于grid和tree拖动后的数据保存问题 / 910 19.3　本章小结 / 910 第20章　扩展与插件 / 911 20.1　扩展与插件的区别 / 911 20.2　扩展与插件如何选择 / 911 20.3　如何编写扩展 / 911 20.3.1　命名空间 / 911 20.3.2　定义扩展 / 912 20.3.3　定义别名 / 912 20.3.4　定义备用名 / 912 20.3.5　要求加载的类：requires与uses / 912 20.3.6　混入功能 / 913 20.3.7　构造函数与initcomponent方法 / 913 20.3.8　静态属性和方法与单件模式 / 913 20.3.9　可自动生成set和get方法的属性与initconfig方法 / 914 20.3.10　在扩展中常用的方法 / 914 20.3.11　编写扩展：treecombobox / 914 20.4　如何编写插件 / 920 20.4.1　概述 / 920 20.4.2　abstractplugin对象 / 921 20.4.3　插件的别名 / 921 20.4.4　编写插件：rowcolor / 922 20.5　扩展和插件介绍 / 923 20.5.1　概述 / 923 20.5.2　本地分页代理：ext.ux.data.pagingmemoryproxy / 923 20.5.3　标签滚动菜单：ext.ux.tabscrollermenu / 925 20.5.4　编辑器tinymce / 926 20.6　本章小结 / 928 第21章　主题开发 / 929 21.1　准备工作 / 929 21.1.1　安装ruby / 929 21.1.2　安装compass / 930 21.1.3　sass介绍 / 931 21.2　为ext js 4创建新主题 / 933 21.2.1　概述 / 933 21.2.2　目录结构 / 933 21.2.3　修改配置 / 933 21.2.4　编译 / 935 21.2.5　测试主题 / 935 21.3　通过ui配置项设置组件样式 / 937 21.4　本章小结 / 937 第22章　mvc应用架构 / 938 22.1　mvc应用架构的构成及工作流程 / 938 22.1.1　构成 / 938 22.1.2　控制器的工作流程：ext.app.controller / 938 22.1.3　application对象的工作流程 / 940 22.2　一步一步实现mvc框架 / 942 22.2.1　概述 / 942 22.2.2　创建目录 / 942 22.2.3　创建首页 / 942 22.2.4　创建启动脚本：app.js / 943 22.2.5　定义登录对话框 / 944 22.2.6　创建应用脚本：application.js / 948 22.2.7　创建viewport视图 / 949 22.2.8　菜单视图及控制器 / 950 22.2.9　实现订单管理 / 952 22.2.10　实现产品管理 / 958 22.2.11　示例效果 / 969 22.3　本章小结 / 970 附录　简写类名与ext js类名对照表 / 971

1,451

社区成员

41,355

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章