Office中国论坛/Access中国论坛

标题: 程序入口、界面控制 [打印本页]

作者: zhuyiwen    时间: 2002-5-4 05:08
标题: 程序入口、界面控制
本程序是总结轻魂ACCESS源码区论坛的一些贴子组合而成。仁者见仁,智者见智。

主要功能:完整的应用程序结构,主程序入口,主窗体背景、图标设置,关闭程序时的提示。



请点此下载

[em26][em26][em26]
作者: make    时间: 2002-5-4 16:43
哇, 这样很好呢, 如果网站所有的贴子都能做了个例子就好啦, 我就喜欢例子
多谢版主

作者: huanghai    时间: 2002-5-4 18:51
精品,值得收藏。
作者: zhuyiwen    时间: 2002-5-4 21:16
标题: 程序讲解

一、背景的实现

    在本程序中有一个类模块 CMDIWindow,该类实现了设置、更换 ACCESS 主窗口的背景的方法。
    在程序中,创建一个从一开始到应用程序结束的全程隐藏窗体 frmAppUnit,在该窗体中创建 CMDIWindow 类的实例 mclsMDIClientWnd,设置属性 DrawMode (背景显示方式)、ImagePath(背景文件名),并调用其方法 Hook 实现更改设置 ACCESS 主窗口的背景。注意:该对象必须是贯穿程序全程的,因此 frmAppUnit 总是打开的(只是不可见)。更换背景时,只需设置属性 DrawMode、ImagePath 即可,不要再次使用 Hook 方法。在程序结束时必须调用 UnHook 方法解除 ACCESS 主窗口的背景设置,并释放对象 mclsMDIClientWnd。
    如果要改变背景和显示方式,可以用 frmAppUnit.Visible = True 语句事显示 frmAppUnit 窗体,重新设置背景和显示方式。

二、程序入口的实现

    程序入口就设在 frmAppUnit 窗体的 Form_Load 事件处理中, frmAppUnit 是程序打开的第一个窗体,但它会隐藏,因此可以在此处打开第一个要显示的窗体,如登录窗体。当然没有窗体也没关系,因为这时程序的菜单以激活,控制权已经落到菜单上了(ACCESS 主窗口)。

三、关闭提示的实现

    由于 frmAppUnit 窗体是隐藏的(不可见),当关闭数据库时,会自动激活 frmAppUnit 窗体的 Unload 事件,当选择“是”,就会关闭数据库,选择“否”,就不会关闭数据库。

    另,在 frmAppUnit 窗体的 Form_Load 事件中实现了更改应用程序的标题和图标。

[em26][em26][em26]
作者: 竹笛    时间: 2002-5-5 00:40
五一节收到的第二个好礼物!
作者: 笨小漆    时间: 2002-5-5 03:19
:)收到。
作者: youshanzx    时间: 2002-5-5 04:50
初来贵地,收获不小,非常感谢!!!
作者: zhuyiwen    时间: 2002-5-6 00:35

  如果把这个文件编译成 .mde 的文件后,再运行,效果更好!不会出现假死机现象。

  [em26][em26][em26]
作者: zhuyiwen    时间: 2002-5-6 00:36

  请参见贴子:

  http://www.accxp.com/club/topic.cgi?forum=19&topic=133

  [em26]
作者: hjzou    时间: 2002-5-11 22:10
版主:我用了,管用。但是我的窗体标题栏中除了我自己在启动中加入的标题外,后面还有“ -[XXXX:窗体]”字样。在切换到其他窗体时, 也会显示出其他窗体的名称,如何去掉?
作者: zhuyiwen    时间: 2002-5-11 22:21
以下是引用hjzou在2002-5-11 14:09:52的发言:
版主:我用了,管用。但是我的窗体标题栏中除了我自己在启动中加入的标题外,后面还有“ -[XXXX:窗体]”字样。在切换到其他窗体时, 也会显示出其他窗体的名称,如何去掉?


你没有给窗体赋标题![em26]
作者: yahai    时间: 2002-7-19 23:39
收到
作者: xir    时间: 2003-9-24 22:04
收获不少,斑竹功德无量。
作者: ietey    时间: 2003-9-24 23:23
非常的好,可是如何看到源码,请指教。谢谢
作者: zhuyiwen    时间: 2008-8-26 15:39
今天又把它翻出来了,好久没用,都忘了

可叹哪,知识学得不牢.
作者: ydyyhx    时间: 2008-8-29 01:46
标题: 回复 1# 的帖子
分享是伟大的
作者: liuxinquan    时间: 2009-3-27 16:46
收下 , 已解决导出问题
作者: yuayua23    时间: 2009-3-27 22:48
谢谢学习




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3