delphi 5企业级解决方案及应用剖析005.PDFVIP

下载 第5章 集成Web功能的主界面 虽然人力资源管理部门使用的是基于 C / S构架的应用程序，但我们在主界面窗体上集成了 We b浏览器功能，使用户在进行人力资源管理的同时也可以随时链接到企业内部网或 I n t e r n e t 上，查询相关的企业内部信息和政策法规信息，实现全方位的信息资源共享。同时，为了能 够以电子邮件形式批量发送公文、报表，我们还设计了电子邮件处理模块，以便直接从数据 库中提取报送机构和联系人信息，批量邮递有关公文、报表。本章将介绍如何实现这一功能， 并剖析程序实例。 5.1 主界面设计 主界面是一个应用程序的脸面，是应用程序各功能模块的门户，它设计的好坏直接关系 到用户对整个应用系统的印象。在这里我们充分吸取了 Wi n d o w s 界面的长处，采用了漂亮的 浏览器风格( I E ) ，使之既具备浏览器上网功能，又能实现自身的各模块功能。 设计的思路如下：首先设计一个具有浏览器风格和功能的窗体 M a i n F o r m 。然后通过继承 该窗体新建窗体 M a i n F o r m 1 ，在这个窗体上充实菜单和工具栏按钮，并为它们编写代码以调 用各个功能模块。 图5 - 1 - 1就是M a i n F o r m 窗体的设计界面，我们在上面放置了带动画的 C o o l b a r 。窗体下面 使用了Wi n d o w s风格的状态栏，分三个部分分别显示系统信息、日期时间和用户信息。从窗 体上我们还可以看到一些非可视化组件，它们是：动作列表 ( TA c t i o n l i s t ) 、图形列表 ( T I m a g e l i s t ) 、菜单和时钟。窗体中最重要的部分就是浏览网页 We b B r o w s e r 1组件了。 图5-1-1 MainForm窗体的设计界面 158 第二篇 人力资源管理系统解决方案及应用剖析 下载 下面是M a i n F o r m 窗体的程序单元完整代码，对其中关键的部分我们进行了注释。同时在 本章的后续部分，我们将对 C o o l b a r和We b控件的使用进行更详细的剖析： unit Main; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Menus, ComCtrls, OleCtrls, Buttons, ToolWin, Isp3, ActnList, ImgList, shdocvw; const CM_HOMEPAGEREQUEST = WM_USER + $1000; cIntHomepage=c:\temp.htm;//缺省主页，在初始化或无法链接站点时出现。 type TMainForm = class(TForm) StatusBar1: TStatusBar; MainMenu1: TMainMenu; nView: TMenuItem; NavigatorImages: TImageList; NavigatorHotImages: TImageList; LinksImages: TImageList; LinksHotImages: TImageList; CoolBar1: TCoolBar; ToolBar1: TToolBar; BackBtn: TToolButton; ForwardBtn: TToolButton; StopBtn: TToolButton; RefreshBtn: TToolButton; ToolBar2: TToolBar; ToolButton6: TToolButton;