资源预览内容
第1页 / 共40页
第2页 / 共40页
第3页 / 共40页
第4页 / 共40页
第5页 / 共40页
第6页 / 共40页
第7页 / 共40页
第8页 / 共40页
第9页 / 共40页
第10页 / 共40页
亲,该文档总共40页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
生产管理知识生产管理库房管理系统vfp实例教程库房管理软件一、建立数据库九.浏览修改表单二、主程序十.修改总数据库表单xgmain三、主菜单十一.个人工具卡表单grgj四.建立logo表单十二.创建本地视图ll_gjk五.表单systen十三.创建修改个人工具卡表单grgjk六.表单rkd(入库单)十四.建立报表七.出库单ckd十五.连编八.器材明细表表单十六.制作安装盘一、建立数据库1、新建数据库kfgl,保存到d:demodata目录下。2、在kfgl数据库中新建表systen(.dbf),五个字段:fzr、bgy、jhy、cly、mima,其标题分别为:负责人、保管员、计划员、材料员、密码。(图5-1)可以在其输入掩码文本框内输入其掩码,其作用是:在你浏览此表时只显示掩码,而不显示其内容。例如:你的密码是“wyc”,你输入掩码为“ok”,在你浏览表时,显示密码为“ok”,可以起到一定的保密作用,而在程序中调用表显示其内容时,不显示掩码。3、新建表:ckbhc(10),rqd(8),qcmcc(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),pzbhc(10),rksln(8,2),rkjen(10,2),cksln(8,2),ckjen(10,2),gcmcc(30),bzc(6),clyc(6),bgyc(6),jhyc(6),llrc(6),fzrc(6),lhc(6),ytc(20),quc(2),jiac(2),haoc(2),kuc(2)。其标题分别为:出库编号,日期,器材名称,规格型号,类别,单位,单价,凭证编号,入库数量,入库金额,出库数量,出库金额,工程名称,班组,材料员,保管员,计划员,领料人,负责人,料号,用途,区,架,号,库。说明:c-字符型;d-日期型;n-数值型,括号内为字节长度,逗号后面的数值为几位小数。4、新建表:ckbhc(10),rqd(8),qcmcc(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),cksln(8,2),ckjen(10,2),bzc(6),jhyc(6),llrc(6)。其标题分别为:出库编号,日期,器材名称,规格型号,类别,单位,单价,出库数量,出库金额,班组,计划员,领料人。二、主程序settalkoff&关闭对话模式setsafeoffsetstatoffsetdeleon&不处理已删除的记录setcentonsetdatetoansicloseallRELEASEWINDOW常用&关闭常用工具栏ifmod(day(date(),2)=0&偶数日期_=rgb(80,180,150)&窗口背景颜色MODIFYWINDOWSCREENTITLE库房管理应用软件ver2.1为齐;鲁石化检修公司机泵车间编制今天是:+dtoc(date()+cdow(date()else&奇数日期_=rgb(80,150,180)&窗口背景颜色MODIFYWINDOWSCREENTITLE库房管理应用软件ver2.1;软件编制者:王永成今天是:+dtoc(date()+cdow(date()endifZOOMWINDOWSCREENMAX&主窗口最大化_=.f.&去掉主窗口控制按钮deactivatewindow项目管理器&关闭项目管理器mypath=left(sys(16),rat(,sys(16)&确定程序所在的位置setdefato(mypath)&设置当前路径setpathtodata;form;pic&指明路径opendatabasekfgl&打开数据库doformlogo&运行表单logoreadeventsquit三、主菜单操作(BR器材入库命令:doformrkd器材出库命令:doformckd-退出命令:Cleaevent编辑(BR编辑浏览出入库单命令:doformllxg浏览个人工具卡命令:doformgrgj修改个人工具卡命令:doformgrgjk-基本设置命令:doformsysten游戏(BR猜数游戏命令:doformcsyx身体状态测试命令:doformstcs-心灵感应命令:doformxlgy退出(BR命令Clea四、建立工具栏1、在项目管理器中选类库,按新建按钮,出现新建类对话框。2、类名输入kuf,派生于选择toolbar,存储于:D:demoform,按确定按钮,出现类设计器。3、跟建立表单一样,如图5-2,我们建立8个命令按钮,其tooltiptext分别为:器材入库,器材出库,修改,浏览,查找器材,身体状态测试,猜数游戏,退出。给按钮加上图片、文字(例如:猜字)。在各自的click方法程序中输入相应的命令(如:doformrkd),现在还没建立这些表单,可以在建完以后再输。四.建立logo表单(图5-3)(1)表单logo,titlebar为0-关闭,height=115,width=222。其init过程:usesysten1.width=03.Left=publictbs,bgy1,cly1,jhy1,fzr1=0=0bgy1=bgycly1=clyjhy1=jhyfzr1=fzr(2)Label1的caption为“欢迎使用库房管理软件”,透明,楷体,12号,黄色。(3)Label2的caption为“输入密码”,透明,黑体,12号,绿色。(4)Label3的caption为“软件作者:齐鲁石化公司检修公司机泵车间王永成”,透明,白色。(5)文本框txtpassword,passworchar为*。(6)计时器timer1,interval=200。其timer过程:if160&判断label1的宽度是否大于1601.width=0&label1的宽度设为0Else1.width=1.width+16&宽度增加16EndIf*以下作用是让label3向左移动If3.Left=3=messagebox(你不是合法用户!你不能使用!,64,提示窗口)Cleaeventelse=messagebox(口令不正确!请重新输入!,64,提示窗口).value=.setfocus()endifENDIF(8)命令按钮caecel,退出。其click过程:Cleaevent五.表单systen(1)、表单的“caption”为“基本信息”,“windowtype”为1-模式。(2)、建立标签“label1label5”、文本框“text1text5”和命令按钮“mand1”。(3)、右击表单选择“数据环境”(图6-1)。(4)、填加表。(图6-2)(5)、text1text5的“controlsource”分别选择、。(6)、label1label5的caption为:负责人、计划员、材料员、保管员、密码。(7)、mand1.cilck为:。(8)、text5的“inputmask”为:“XXXXXX”,“passwordchar”为:“*”。操作说明:此表单让你修改一些基本数据,在材料入库时这些人的名字自动填加,在这里可以修改密码。退出表单修改自动保存。六.表单rkd(入库单)(1)、我们用一些标签和线条建立(如图6-3)表单rkd,你可以根据自己单位的情况设计。其“titlebar”为:0-关闭。(2)、建立17个文本框(由于我在设计时进行过修改,删掉了一些文本框,所以现在不连续),其“backstyle”为:0-透明、“bordercolor”为:0-无。其“controlsource”分别为:text9为bgy1,text12为fzr1,text17为cly1,其它的均与其name相同(例:text1为text1.)。(3)、组合框bo2,“bordercolor”为:0-无,“controlsource”为cbo1,“rowsource”为:“钢材,管件,配件,工器具,量具,杂品,消耗品,油料,劳保,阀门”,“rowsourcetype”为:1-值。(4)、命令按钮mand1(确定)的click过程为:tis=messagebox(保存入库单?,4+64,提示窗口)iftis=6if!used(main)usemainelseselemainendifAPPENDBLANKrepllbwithcbo1replrqwithdate()replpzbhwithtext4replgcmcwithtext5replytwithtext6repllhwithtext13replqcmcwithtext19replggxhwithtext20repldwwithtext7replrkslwithtext8repldjwithtext10replrkjewithtext11repljhywithtext23replbgywithbgy1replfzrwithfzr1replllrwithcly1usetext20=text13=text4=text8=0.00text10=0.00text11=0.00text1=year(date()text2=month(date()text3=day(date()2.setfocusendif(5)、命令按钮mand2(退出)的click过程:use(6)、表单form1的init过程:publictext1,text2,text3,text4,text5,text6,text7,text8,text10,text11,;text19,text20,text23,cbo1,text9,text13text5=text6=text7=text13=text17=text19=text20=text23=text12=text9=text4=text8=0.00text10=0.00
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号