Delphi中数据的自动录入

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

　　1、利用Delphi调用Excel

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

　　步骤如下:

　　(1) 创建一个普通Application． 

　　(2) 在Form中分别放入ExcelApplication， ExcelWorkbook和ExcelWorksheet．

　　(3) 连接Excel． 

　　打开Excel．

 

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; 

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