delphi 如何通过Tdataset数据集 获取数据库列名以及列数？

（1）数据库列数可以用“TDATASET”的“FieldCount”属性获得。

（2）数据库列名可以做一个循环得到，例如：

var

i:integer

begin

for i := 0 to Table1.FieldCount-1 do

showmessage(Table1.Fields[i].FieldName)

end

Delphi，是Windows平台下著名的快速应用程序开发工具(Rapid Application Development，简称RAD)。它的前身，即是DOS时代盛行一时的"BorlandTurbo Pascal"，最早的版本由美国Borland(宝兰)公司于1995年开发。主创者为Anders Hejlsberg。经过数年的发展，此产品也转移至Embarcadero公司旗下。Delphi是一个集成开发环境(IDE)，使用的核心是由传统Pascal语言发展而来的Object Pascal，以图形用户界面为开发环境，透过IDE、VCL工具与编译器，配合连结数据库的功能，构成一个以面向对象程序设计为中心的应用程序开发工具。

由Borland公司推出的Delphi是全新的可视化编程环境，为我们提供了一种方便、快捷的Windows应用程序开发工具。它使用了MicrosoftWindows图形用户界面的许多先进特性和设计思想，采用了d性可重复利用的完整的面向对象程序语言(Object-Oriented Language)、当今世界上最快的编译器、最为领先的数据库技术。对于广大的程序开发人员来讲，使用Delphi开发应用软件，无疑会大大地提高编程效率，而且随着应用的深入，您将会发现编程不再是枯燥无味的工作--Delphi的每一个设计细节，都将带给您一份欣喜。

要用DELPHI中的ADO系列控件访问Excel数据文件，首先应该建立一些基本概念。你需要将一个Excel数据文件想象为一个关系数据库，Excel文件中的每个工作表就对应该数据库中的一个表，而工作表中的每一列当然就是表的列了。然后，按照下列进行就可以：

1.设置ADOConnection的ConnectionString

构造ConnectionString时，OLE

DB的提供者要选择Microsoft

Jet

4.0

OLE

DB

Provider作为ADO的驱动程序。这本来是用于连接Access数据库的驱动程序，但也可打开Excel文件。

连接的数据库名称当然就是你要打开的Excel文件，注意扩展名是*.xls，而不是*.mdb。

最关键的一点是，还要设置扩展属性Extended

Properties为“Excel

8.0”，否则，测试连接时会报告无法识别数据格式的错误。Extended

Properties的属性值在“所有”参数页中输入。

提供另一个思路，不知道是不是适用你。

你可以使用客户端数据集。

你说的功能可灵活实现。你可以测试数据量的大小，即只处理数据表中的一部分数据，如100条。当然，客户端的刷新也只处理这100条。

另一个方式，你可以直接把新增的数据，放到客户端的数据集，可以删除的。其原理是记录在另一个记录表，记录变化的数据。这种方式，你逐条的处理都可以，很灵活。

还有，看你说的，不知道理解的对不对。你可以对数据感知组件，关掉刷新功能。这样数据在变化过程中不会刷新。在完成数据的处理后，再打开此功能。比如，你逐条对数据中的列做运算，在运算前可以关闭，处理完再打开。

不清楚的，可进一步沟通。

---