flexitime的专栏

介绍用Delphi来编写MIS类程序的书籍多如牛毛，从“什么Delphi的初级入门”到“Delphi的什么应用大全”中都有，在网上相关的教程文档更是数不胜数。但不知道大家有没有发现，这些文档和书籍大都只是泛泛而谈。从数据库的结构到程序的编写，都是那么的简单，而且程序的界面基本都是十分相像的，那些程序除了说明一些关键的数据库技术的应用外，其实根本说不上是一个完整的程序。诚然，作为某技术点的教材确实还

2.5 整理框架       在上一章的1.6节中，我们第一次整理出一个属于自己MDI应用的框架，而我们在上一节中也完成了MDI的登录界面等，在这一节中，我们再接再厉，把登录界面相关的东西也做到框架里面去！2.5.1 把登录界面放到框架里面登录的界面几乎是每个MIS都会需要的，但登录界面可能随着每一个应用的不同而样式也都不会一样。所以，我们采用子窗体与主窗体的方式把它分开。首先，把Lo

 2.2 连接数据库       终于到这个标题了，一个MIS系统不可能没有数据库的支持，如果没有了就变成“没本之木，无源之水”。在这个教程中，我选用的数据库是MS SQL Server系列，你可以使用SQL Server 2000或者2005，2005有一个免费的Express版本，你当然也可以使用它。这个教程并不打算教大家如何使用SQL Server（我也没有这本事，大家可以有空多上C

2.让我们登录吧！2.1 登录界面       在第一章我们研究了如何编写一个MDI的框架，以后我们就会利用这个框架来建立起我们的MIS应用，但这里有个问题，因为我们知道一般的MIS都不会只是单人使用的，而多人使用的应用程序也一般会有用户、权限等等的划分。因此，用户身份的确认应该是我们整个MIS应用开始的第一步，现在我们来看一下，如何实现用户身份的确认，或者说如何实现用户的登录。   

 1.7消除窗体的过度耦合       在上一节中，我们整理出一个颇具雏形的框架（Framework），但这个框架还有一些不太理想的地方。1.7.1消除ChildFormDefine中对子类的依赖首先我们先来看ChildFormDefine.pas的内容，……implementationuses  MainForm;……  if Action = caFre

1.6整理程序的框架经过上面一节，我们已经有了一套比较好的控制主窗体和子窗体的代码了，但这些代码有一个特别碍眼的地方，就是窗体的控制与业务代码混在一起，这样一来，当我们要新建立一个新的工程时，我们就不能很好的复用之前所写的窗体控制代码，为此我们在这一节中，把控制代码分离出来。首先，我们把MainForm.pas另存为 MainFormDefine.pas，然后将这个frmMain改名为Cu

 之前分开一节一节的写完《用Delphi写MIS类程序》第一章，现在把这一章打包发布出来，有兴趣的朋友可以下载，内附源码。下载了的朋友，请无论觉得本人写的水平如何，都请吱个声。谢谢下载的地址：http://www.box.net/shared/95lxrghoaa  http://www.namipan.com/d/2b07dfc88f6c38612efd7853c820c14

1.3 第二个程序，来点数据保存的代码在上一节中我们已完成了一个十分简单的MDI程序，但这个程序除了能打开和关闭外就什么也干不了，现在我们想象一下实际的情况，一个MIS的程序很多时候都需要保存用户录入的数据到数据库中去，而且为了保证这些数据能不被遗留的保存，程序一般会提示用户。现在我们在第二个程序中加入这些代码，当然为了程序的简单，我们暂时还是不讨论连接数据库的情况，我们用一个外置的文本文件(

1.5 改造主窗体的代码在上一节中我们通过创建一个子窗体的父窗体来规范和简化子窗体的代码，但我们却为此使得主窗体的代码增加了不少，而且要创建一个子窗体时还要增加不少的代码。这样的效果还不是我们想得到的。现在让我们来看看如何来简化主窗体的代码 procedure TfrmMain.mnFormCClick(Sender: TObject);var  frm : TCustomCh

 1.程序的基本界面1.1 使用MDI 还是 SDI在Windows的程序中，不论窗体的表现形式如何，其实都可以大致分为MDI和SDI两种不同的程序。在很多的教程中，都是用SDI（Single Document Interface）作为例子的，因为SDI比较的简单，程序大都只用一个窗体作界面，几乎所有的功能都集中在这个窗体上。当有些程序确实要用到另外的窗体时，就在主窗体上加个按钮来激活

2.4 让界面更友好一些       经过上面的改进，我们有了一个共用的设置类，我们可以通过这个共用的设置类来访问诸如数据库连接等一些MIS的基本属性。现在我们再来运行一下程序，不过这次我们先把SQL Server关闭一下，然后再来看是什么样的效果，我们会发现，当你运行程序时，程序会等了好久都没有反应。当然最后会出现一个报错说找不到SQL Server数据库服务。       设想一下，当