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的每一个设计细节，都将带给您一份欣喜。

select name from syscolumns

where id in (select id from sysobjects where xtype='u' and name='表名' )

这应该是列类型设计吧？ 这个肯定是用 C# 来做了， 在C#中把字符串转换成int型之后传入到SQL中。 当然你直接用字符串传入SQL也没有太大问题， 但C#的表现层应该把用户输入的有效性进行检验后再传入SQL。 字符串转入int的方法是 int.Parse 和 int.TryParse 向SQL传值可以是直接拼接SQL语句如 "......column1 = " + myIntVar + ", ...." 或者用DbParameter如 "......column1 = @column1, ...."，然后在DbCommand 中加入参数：mycmd.Parameters.Add(new SqlParameter("@column1", myIntVar))

---