Спасибо за помощь. Я сделал так:
Код:
procedure TForm2.Button1Click(Sender: TObject);
var s:string;
begin
s:=Format('CREATE TABLE ''%s''(''%s'' CHAR(20), ''%s'' CHAR(120))',['imtab','ima','adr']);
ADOCommand1.CommandText:=s;
ADOCommand1.Execute;
end;
Но всё равно выдаёт ошибку, что сиснтаксис sql не правельный начиная от сюда: 'imtab'('ima' CHAR(20), 'adr' CHAR(120))