Question

delphi7编程SQL语句如何实现添加功能

Answer 1

在Form界面上添加ADOquery控件，然后将其与你需要写入数据的数据库中的某张表table1建立链接；假设你的table里有三个字段分别是ID（varchar类型），time（datetime类型），daxiao（real类型）；则给数据库表中添加记录如下：
qrystring;string;
with ADOQuery1 do

begin
qrystring:='insert into table1 (ID,time,daxiao)VALUES
('+''''+'id1'+''''+','+''''+'2013-9-30 00:00:00'+''''+','+''''+floattostr(daxiao)+''''+')';
ADOQuery1.Close;
ADOQuery1.SQL.clear;
ADOQuery1.SQL.Add(qrystring);
try
ADOQuery1.execsql;
except
ADOQuery1.cancel;
end;
end;

这是只是其中的一种方法，adoquery的以及根据你用的控件不同还可以有多种，看你的侧重点在哪儿了。

Answer 2

添加数据？

sql:='insert into table (v1,v2) values (''111'',2)';
adoquery.close;
adoquery.sql.text:=sql;
adoquery.Execute;

或
sql:='select * from table';
adoquery.open;
adoquery.append;
adoquery.fieldbyname('v1').value:='111';
adoquery.fieldbyname('v2').value:=2;
adoquery.post;

其中v1是字符串类型字段 v2是integer字段