delphi＋sql办公自动化系统（＋开题报告源程序＋论文正文＋外文翻译＋答辩ppt）

enForm(TfrmLogdaily,frmLogdaily,self);
end;

procedure TfrmMain.FormShow(Sender: TObject);
begin
frmLogIn.ShowModal;
OpenForm(TfrmTodayWork,frmTodayWork,self);
end;

procedure TfrmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
   if MessageBox(self.Handle,'您确定真的要退出系统吗?','提示',MB_OKCANCEL+MB_DefButton2+MB_ICONINFORMATION)=idOK then
    Canclose:=True
   else
    Canclose:=False;
end;

procedure TfrmMain.Timer1Timer(Sender: TObject);
begin
StatusBar1.Panels[0].Text:='使用者：'+DeptName+'|'+UserName+' '+'登录时间：'+DateTimeToStr(LogInTime);
StatusBar1.Panels[1].Text:='系统时间：'+TimeToStr(Now);
StatusBar1.Panels[2].Text:='使用时间：'+TimeGetStamp(TimeToStr(LogInTime));
StatusBar1.Panels[3].Text:='版权所有：南都信息网';
end;

procedure TfrmMain.FormClose(Sender: TObject; var Action: TCloseAction);
begin
AddLogin;
Action := caFree;
end;

procedure TfrmMain.N1Click(Sender: TObject);
begin
OpenForm(TfrmServerChart,frmServerChart,self);
end;

procedure TfrmMain.N2Click(Sender: TObject);
begin
OpenForm(TfrmTotal,frmTotal,self);
end;

procedure TfrmMain.AboutClick(Sender: TObject);
begin
OpenForm(TfrmAbout,frmAbout,self);
end;

procedure TfrmMain.ExitClick(Sender: TObject);
begin
Application.Terminate;
end;

procedure TfrmMain.N3Click(Sender: TObject);
begin
OpenForm(TfrmTotal,frmTotal,self);
end;

procedure TfrmMain.N5Click(Sender: TObject);
begin
OpenForm(TfrmSendMsg,frmSendMsg,self);
end;

end.

总结
办公自动化系统是一个典型的信息管理系统，其主要通过软件工程方面的选择课题、需求分析、总体设计、选用工具、程序模块、系统测试等几个步骤来实现。开发本系统的过程中，首先要对水电管理进行系统调研，熟悉其中的系统设置、水电费用计算的流程、步骤；其次在系统需求分析过程中，要透过现象看本质，敏锐观察到水电管理中存在的各种问题，并在总体设计把握好对问题的分析、理解，进而解决问题；选用开发工具要选用自己最熟悉、应用较多的开发工具，本系统开发选用DELPHI 6.0，其具有语言简单、功能强大、组件众多的优点。程序模块的编制中，重点把握系统内部完整性、功能性、实用性、便捷性，使其能够协调统一、运行无误。

致谢

我首先感谢我的指导老师吕老师，在他严格的要求下我懂得了开发软件要有一种极其认真负责的态度。无论做什么事都要大胆的去想去做，这样会有好的创意，才能更有作为。
在这里我还要感谢我们宿舍的其它5个同学。他们和我共同生活了四年，在生活和学习上给了我很大的帮助。

参考文献

1 张春林.Delphi 6程序设计导学.北京：清华大学出版社，2002.5
2 飞思科技. Delphi6开发者手册. 北京：电子工业出版社,2002.3
3 飞思科技. Delphi6数据库开发. 北京：电子工业出版社, 2002.1
4 丁宝康.数据库原理. 北京：经济科学出版社，2004.1
5 何旭洪.Delphi 6.0数据库系统开发实例导航.北京：人民邮电出版社, 2002.4
6周璋鹏. 基于B/S结构的学生信息管理系统垢研究与开发.西北电力技术.2003，31(4):15~17,26
7 李全彬, 顾明亮. 基于ASP技术的学生信息管理系统的研究与开发. 徐州师范大学学报(自然科学版).2001,19(2):25~28
8 谷军.用Authorware开发学生信息管理系统.计算机与与现代化.2003(7):40~41,44
9李丹荣,杜维.基于Delphi6．0的实时数据采集与分析系统机电工程.2003,20(5): 64~67

首页上一页 12 13 14 15 下一页尾页 15/15/15

delphi＋sql办公自动化系统（＋开题报告源程序＋论文正文＋外文翻译＋答辩ppt）(十五)