with Query1 do
begin
close;
sql.clear;
for i:=0 to count do
begin
sql.clear;
///// str:='insert into Table1(f1,f2,f3) values ('+a[i]+','+b[i]+','+c[i]+')';
// 上面这句出错,说string 和 single uncompatible什么的,我的table1的三个字段都是single,
// a[],b[],c[]三个数组也都是single,这样子写不行吗? 数据库是Access的,用的是BDE
//// str:='insert into Texp3 values ('+i*i+','+i*i+','+2*i+')';
// 上面这句也还是错的,那就是说 应该不是数组 的问题 str:='insert into table1 values (0,0,0)'; // 这句就没错,是不是不能用变量??
sql.Add(str);
execsql;
end; //for
close;
end; //with谢谢了
begin
close;
sql.clear;
for i:=0 to count do
begin
sql.clear;
///// str:='insert into Table1(f1,f2,f3) values ('+a[i]+','+b[i]+','+c[i]+')';
// 上面这句出错,说string 和 single uncompatible什么的,我的table1的三个字段都是single,
// a[],b[],c[]三个数组也都是single,这样子写不行吗? 数据库是Access的,用的是BDE
//// str:='insert into Texp3 values ('+i*i+','+i*i+','+2*i+')';
// 上面这句也还是错的,那就是说 应该不是数组 的问题 str:='insert into table1 values (0,0,0)'; // 这句就没错,是不是不能用变量??
sql.Add(str);
execsql;
end; //for
close;
end; //with谢谢了
应该这样,先把数字转换为 字符串才行
sql.add('insert into table (f1,f2,f3) values (:f1,:f2,:f3)');
Parameters.ParamByName('f1').value := a[i];
.......................