字符串变量怎么拼接啊？

[gxxc2008]

定义了好多SQL语句，例如
var
sql,sql2,...:string;
i:integer;

sql1:=' UPDATE ***';
sql2:='UPDATE ***';
sql10:=' update ***';

现在想做一个循环，执行这些语句
比如
FOR i:=1 TO 10 DO
BEGIN
CLOSE;
SQL.CELAR;
SQL.TEXT:=????
ExecSQL;
END

SQL.TEXT后面怎么写啊，实际上是想为变量sql&&INTTOSTR(i)的效果。。。

[what_is_Delphi]

我给你个例子参考下：

[gxxc2008]

我问的问题实际上不是SQL语句的拼接，和SQL语句无关，是拼接后的结果是定义的某个变量。 有点类似于 if (FindComponent('edit'+IntToStr(i)) is TEdit) then (FindComponent('edit'+IntToStr(i)) as TEdit).Text:='hello';

[gxxc2008]

类似于我想做i:=1时候， sql.text:=sql1 具体执行这条独立语句，执行完结束。 I:=2时，做执行第二条SQL.TEXT:=SQL2这样的一条独立语句，执行完结束。 sql1,sql2都是提前定义的字符串变量。

[zhang3652]

var sqllist: tstringlist; i:integer; sqllist := tstringlist.create; sqllist .add(' UPDATE ***'); sqllist .add('UPDATE ***'); sqllist .add(' update ***'); 现在想做一个循环，执行这些语句 比如 FOR i:=1 TO 10 DO BEGIN CLOSE; SQL.CELAR; SQL.TEXT:=sqllist .strings[i-1]; ExecSQL; END

[踏雪无痕]

SQL.TEXT:=????就使用 SQL.TEXT:=sql; sql由什么组成呢？sql1+sql2+...................sqlN，注意各sql以分号;结束

[doloopcn]

将SQL定义为数组吧 var sqls array of string; begin for i:=low(sqls) to high(sqls) do begin CLOSE; SQL.CELAR; SQL.TEXT:=sqls[i] ExecSQL; END; end.