delphi 数据库编程创建数据表,表名可以是变量吗？变量应该怎么表示阿。谢谢

[jsshixm]

delphi 数据库编程创建数据表,表名可以是变量吗？这个变量应该怎么表示阿。谢谢

[bdmh]

var
  tablename:string;
begin
  adoquery1.close;
  adoquery1.sql.text := 'select * from '+ tablename;
  adoqpery1.open;
end;

[Oraclers]

在SQL语句中加入，如：（前面的多了单引号，更改下）
var
SQL,TableName :string;
begin
TableName := 'Test';
SQL := Format('Create Table %s (...)',[TableName]);
//也可以是： SQL := 'Create Table '+ TableName + ' (...)';
...
end;

[Oraclers]

在SQL语句中加入，如：
var
SQL,TableName :string;
begin
TableName := 'Test';
SQL := Format('Create Table ''%s'' (...)',[TableName]);
//也可以是： SQL := 'Create Table '''+ TableName + ''' (...)';
...
end;