1. 控件tables改用TQuery控件(名字暂定为Query1)
2. 语句类似如下:
k:=1;
m:=1;
for i:=1 to 100 do
begin
Query1.SQL:='insert into table (col1,col2) values (';
Query1.SQL:=Query1.SQL+str(k)+','''+str(m)+''')';
Query1.ExecSQL();
k:=k+1;
m:=m+1;
\ ......其他语句 .........
end;
3. Delphi访问MS SQL Server的表, 不要使用TTable控件, 它会严重降低系统性能. 应该用TQuery控件. 另外, Borland公司建议: Delphi访问MS SQL Server, 应该使用ADO代替BDE.
2. 语句类似如下:
k:=1;
m:=1;
for i:=1 to 100 do
begin
Query1.SQL:='insert into table (col1,col2) values (';
Query1.SQL:=Query1.SQL+str(k)+','''+str(m)+''')';
Query1.ExecSQL();
k:=k+1;
m:=m+1;
\ ......其他语句 .........
end;
3. Delphi访问MS SQL Server的表, 不要使用TTable控件, 它会严重降低系统性能. 应该用TQuery控件. 另外, Borland公司建议: Delphi访问MS SQL Server, 应该使用ADO代替BDE.
m:=1;
for i:=1 to 100 do
begin
strSQL='insert into table(col1,col2) values('+ str(k) + ',' + str(m) + ')';
Query1.SQL.add(strSQL);
Query1.ExecSQL();
k:=k+1;
m:=m+1;
\ ......其他语句 .........
end;