资深老狐一句感叹:白学了,猫猫究竟有什么魔力,一小时等于十年功?

2022-05-23 14:54:49 浏览数 (1)

最近猫猫在设计整个VFP中间层架构的开发框架,进展不错。

设计目标

  1. 兼容原有CS三层架构模式
  2. 实现一键保存到后端
  3. 实现角色权限模块
  4. 具有一个较好用的主界面。

导航界面设计

界面这块,我选中了倦猫的组件,做得非常好,老实说我觉得倦猫的开发水平在国内是数一数二的,面向对象用得非常之好。

这个界面我是有取得倦猫的授权的。

主界面效果

将这个倦猫的导航类做了中间层改造,不依赖数据库。 可以自由添加左侧导航。 自由添加顶部,底部按钮。 中间的导航按钮元素可以自由排列。 按钮图标可以自定义,并且所有客户端自同步。

数据访问层设计

新增了中间层数据访问DAL类Qiyu_MidderCursor,效果跟平常的DAL_CA类的操作一模一样,只不过一个用中间层来做数据处理,一个用SQL来做数据处理。

加载一个中间层数据访问类(DAL_MC)

代码语言:javascript复制
oDAL=NEWOBJECT("Qiyu_MidderCursor","Qiyu_MidderCursor.prg")
oDAL.loadurl=serverurl "ctl_role.fsp?proc=getlist"
oDAL.saveurl=serverurl "ctl_role.fsp?proc=save"
oDAL.keylist="id"   &&主键字段,支持复合主键
oDAL.root="rows"    &&数据所处的位置
oDAL.alias="sy_user"   &&表别名    
oDAL.IDKey="id"

TEXT TO oDAL.cursorstruct NOSHOW TEXTMERGE
 ROlename C(30) , MEmo  C(100) , ID   I(4) , CTime  T(8) , UTime  T(8) 
ENDTEXT


IF !oDAL.open()
  MESSAGEBOX(oDAL.msg,0 16,thisform.Caption)
  RETURN .f.
ENDIF 
thisform.Oca=oDal

保存也极其简单

代码语言:javascript复制
If !Thisform.Oca.Save()    
Messagebox(Thisform.Oca.msg,0 16,Thisform.Caption)
    Return
Endif

Wait Windows "保存成功" Timeout 3

基于角色的权限设计

角色管理

用户管理

权限管理

中间层代码生成器SQL版本

现在的中间层开发平台,可以让你的DBF秒变网络版数据库,对于只会用DBF的狐友来说,直接可以用DBF开发BS、CS、APP、公众号、微信小程序,可以实现少写百分之八十的代码,极速开发。

来自狐友的的评价:

资深老狐友一句感叹,以前白学了。

学东西,千万要和能拿到结果的人学习,自己真心想要做一件事,排除万难也要做到。

0 人点赞