Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите разобраться с ошибкой пожалуйста.... [D6, Paradox]


KaPaT ©   (2002-09-28 14:06:00) 

Ошибка такая: Invalid use of keyword. Token: BirthDay
Код такой:

With Main do
begin
Query.SQL.Clear;
Query.SQL.Add("UPDATE "base.db"");
Query.SQL.Add("SET");
Query.SQL.Add("Fio = :Fio");
Query.SQL.Add("Birthday = :Birthday");
Query.SQL.Add("Address = :Address");
Query.SQL.Add("Telephone = :Telephone");
Query.SQL.Add("Mobile = :Mobile");
Query.SQL.Add("Pager = :Pager");
Query.SQL.Add("Mail = :Mail");
Query.SQL.Add("Icq = :Icq");
Query.SQL.Add("Nick = :Nick");
Query.SQL.Add("Comment = :Comment");
//Инициализация параметров
Query.Params[0].AsString:=Fio.Text;
Query.Params[1].AsDateTime:=BirthDay.DateTime;
Query.Params[2].AsString:=Address.Text;
Query.Params[3].AsString:=Telephone.Text;
Query.Params[4].AsString:=Mobile.Text;
Query.Params[5].AsString:=Pager.Text;
Query.Params[6].AsString:=Mail.Text;
Query.Params[7].AsString:=Icq.Text;
Query.Params[8].AsString:=Nick.Text;
Query.Params[9].AsString:=Comment.Text;
Query.ExecSQL;
end;


KaPaT   (2002-09-28 14:31:00) [1]

Ребят, спасибо большое....так оно и есть..=)


Юра   (2002-09-28 14:20:00) [2]

Посмотри Local SQL Help "Update".
Возможно у вас нехватает запятых в тексте запроса


NP-237   (2002-09-28 14:14:00) [3]

Вставь запятые

Query.SQL.Add("Fio = :Fio,");
Query.SQL.Add("Birthday = :Birthday,");


KaPaT   (2002-09-28 14:08:00) [4]

Пояснения:
Query находится на форме Main
А Edit"ы на другой


Наверх

Титульная страница Поиск, карта сайта Написать письмо