欢迎来到 黑吧安全网 聚焦网络安全前沿资讯,精华内容,交流技术心得!

Delphi中数据的自动录入

来源:本站整理 作者:佚名 时间:2014-09-05 TAG: 我要投稿

在Delphi数据库应用系统的数据录入过程中,有些数据是保存在Excel中的;有些是保存在纸张上的;还有一些是需要新增加的,由于各条记录之间有大量的重复数据,如果每条记录都让录入人员全部手工录入,其间的重复劳动是相当大的,还降低了工作效率。下面就这个问题进行论述。

  1、利用Delphi调用Excel

  Delphi中已经带了Word与PowerPoint的例子,因为Excel的调用与这两个应用服务器的调用略有不同,所以也可以利用Delphi调用Excel。

  步骤如下:

  (1) 创建一个普通Application. 

  (2) 在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheet.

  (3) 连接Excel. 

  打开Excel.

 

Try ExcelApplication1.Connect; Except End; ExcelApplication1.Visible[0]:=True;
  增加一个Workbook.

ExcelWorkbook1.ConnectTo(ExcelApplication1 Workbooks.Add(EmptyParam,0));

  添加一个Worksheet.

 

Var Temp_Worksheet: _WorkSheet; Begin Try Temp_Worksheet:=ExcelWorkbook1. WorkSheets.Add(EmptyParam, EmptyParam,EmptyParam,EmptyParam,0) as _WorkSheet; ExcelWorkSheet1.ConnectTo(Temp_WorkShee); Except ShowMessage(′Failure′); End; 

 

  关闭Excel.

[1] [2] [3]  下一页

【声明】:黑吧安全网(http://www.myhack58.com)登载此文出于传递更多信息之目的,并不代表本站赞同其观点和对其真实性负责,仅适于网络安全技术爱好者学习研究使用,学习中请遵循国家相关法律法规。如有问题请联系我们,联系邮箱admin@myhack58.com,我们会在最短的时间内进行处理。
  • 最新更新
    • 相关阅读
      • 本类热门
        • 最近下载