delphi主窗体控制子窗体权限

时间:2013-10-15 15:38:35
【文件属性】:

文件名称:delphi主窗体控制子窗体权限

文件大小:182KB

文件格式:RAR

更新时间:2013-10-15 15:38:35

如何控制窗体权限

平常不好对每个业务窗体进行如增删改打印等权限控制 在此建一主窗体,主窗体中放增/删/改等按纽,这些按纽调用基类的增/删/改过程,一基类窗体,所有业务窗体派生于基类窗体,增加一组权限变量,这是全局变量,表示当前用户当前对当前业务窗体的权限.每次要打开业务窗体进行某一类操作时,从权限表中取出当前用户当前窗体的权限,基类窗体建立事件中给主窗体的增/删/改/等按纽按取出的权限设置为是否可用.


【文件预览】:
主子窗口权限控制
----MainUnit1.dfm(3KB)
----所有业务操作窗体都有从基类窗体BaseForm 派生.txt(45B)
----InhertUnit3.dcu(3KB)
----MainUnit1.dcu(5KB)
----MainUnit1.~dfm(2KB)
----RightTestProject1.~dpr(416B)
----MainUnit1.~pas(2KB)
----BaseFormUnit2.pas(1KB)
----MainUnit1.pas(2KB)
----Unit1.dfm(328B)
----BaseFormUnit2.~pas(623B)
----RightTestProject1.cfg(434B)
----Unit1.pas(310B)
----RightTestProject1.exe(395KB)
----BaseFormUnit2.dfm(501B)
----InhertUnit3.dfm(545B)
----InhertUnit3.~dfm(497B)
----InhertUnit3.~pas(381B)
----RightTestProject1.dpr(491B)
----BaseFormUnit2.dcu(4KB)
----InhertUnit3.pas(381B)
----RightTestProject1.res(876B)
----RightTestProject1.dof(2KB)
----BaseFormUnit2.~dfm(501B)

网友评论

  • 好东东,让我想清楚了怎么在MDI主窗体中,用按钮去控制子窗体中的数据新增,修改,删除等,帮助不小。
  • 太初级了,可借鉴的意义不大。 .
  • 太初级了,可借鉴的意义不大。