[Gman]

У меня такая проблемка: Не могу создать программно таблицу в MySQl 5.0.

Код:

DataModul.DataModule2.ADOCommand1.CommandText:='CREATE TABLE '' '+imtab+' ''(''ima'' integer, ''adr'' CHAR(255))';
DataModul.DataModule2.ADOCommand1.Execute;

Что бы присвоить ADOCommand текст sql запроса, необходима его представить в виде строки, для этого он отделяется одинарными кавычками, а чтобы правильно задать запрос по правилам сиснтаксиса mysql имя табл и полей тоже должны быть в кавычках, при чем одинарных.
Самое интересное чтобы добавить строку или поставить условие, то можно использовать двойные кавычки. Т.О. программно у меня не выходит создать таблицу, помогите пожалуйста..

[lmikle]

Напиши как команда должна быть, мы тебе напишем как такую строку собрать в дельфи...

[Gman]

Код:

CREATE TABLE 'imtab'('ima' integer, 'adr' CHAR(120))

Примерно такой SQL запрос к MySQL должен быть, заранее спасибо.

[lmikle]

Код:

s := Format('CREATE TABLE ''%s'' (''%s'' integer, ''%s'' char(120))',['imtab','ima','adr']);

Посление параметры в [] - то, что будет подставленно в строку на место %s

[Gman]

Спасибо за помощь. Я сделал так:

Код:

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))

[Gman]

''%s'' - я так понимаю 4 одинарные кавычки здесь используются