Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Проблемы с SQL запросами...

Автор: Ktin 28.8.2002, 06:37

Что я делаю не правильно? Листинг приводиться:

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.SQL.text:='Create Table customer (Company Char(30), Zip Char(10))';
Query1.ExecSQL;
end;

procedure TForm1.Button2Click(Sender: TObject);
var MyString:string[10];
var MyString2:string[30];
begin
MyString := 'Russia';
MyString2 := 'Russia2';
//что-то надо делать с этой строчкой
Query1.SQL.Add('INSERT into customer values(MyString2, MyString)');
//что-то надо делать с предыдущей строчкой!!!
Query1.ExecSQL;
end;

Выделенная строчка не работает, гадость!
если MyString-ы заменяю на цифры - работает!
Заменяю на ''Something'' работает...
А как из строковой переменной заставить записать...

и если можно, дайте ссылку на синтаксис запросов к SQL и её адаптированность в Delphi(его реализация)!

----------
Помогите, пожалуйста!

Автор: Vit 28.8.2002, 07:09

Примерно так:
Query1.SQL.Add('INSERT into customer values('''+MyString2+''', '''+MyString+''')');

1) Значения в values() должны быть в кавычках, так как это строки а не цифры
2) если ты пишешь 'INSERT into customer values(MyString2, MyString)' то всё что в кавычках интерпретируется как есть, а тебе надо вместо MyString2 вставить ее значение
3) Чтобы кавычка работала внутри кавычки надо её удвоить
4) Чтобы посмотреть чтО реально ты собрался выполнять сразу после построения квери (этой строки) напиши:

ShowMessage(Query1.SQL.gettext);

и в окошке увидишь точно ту строку которая будет послана драйверу базы данных для выполнения