VPF::TQuery глючит - Форум программистов

NiJazz

Дата 18.12.2003, 00:36 (ссылка)

(нет голосов)

Загрузка ...

Jazz coder

Профиль
Группа: Экс. модератор
Сообщений: 2286
Регистрация: 10.8.2003
Где: Москва

Репутация: 6
Всего: 23

Участок кода:

Код


 ImpDates.Close;
 ImpDates.SQL.Clear;
 ImpDates.SQL.Add
 (
    'Select * from ImpDates'+
    'where (Impdates.orgname="'+Edit1.Text+'")'
 );
 ImpDates.Open;
 Impdates.First;
 Edit21.Text := ImpDates.FieldByName('Date').AsString;

Как только в Add добавил where, сразу стала вылазить ошибка: Project CRM.exe raised exception class EDBEngineError with Message "Invalid use of keyword. Token:=PProfy").

Пробовал вместо Edit1.Text подставлять MainInfo.OrgName и просто "PProfy". Всё равно та же ошибка...
Что это?

NiJazz

Дата 18.12.2003, 00:48 (ссылка)

(нет голосов)

Загрузка ...

Jazz coder

Профиль
Группа: Экс. модератор
Сообщений: 2286
Регистрация: 10.8.2003
Где: Москва

Репутация: 6
Всего: 23

Сделал так:

Код


ImpDates.Close;
 ImpDates.SQL.Clear;
 ImpDates.SQL.Add
 (
    'Select * from ImpDates where (Impdates.orgname="'+Edit1.Text+'")'
 );
 ImpDates.Open;
 Impdates.First;
 Edit21.Text := ImpDates.FieldByName('Date').AsString;

И заработало...

Почему же первый вариант не работал?

gray_k

Дата 18.12.2003, 08:41 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник
Сообщений: 1015
Регистрация: 9.1.2003
Где: Москва

Репутация: 3
Всего: 22

Вот как выглядел твой первый вариант:

Код


'Select * from ImpDateswhere (Impdates.orgname="'+Edit1.Text+'")'

Естественно, что он не работал, нет пробела между названием таблицы и where.

--------------------

С уважением.
Gray.

NiJazz

Дата 18.12.2003, 13:45 (ссылка)

(нет голосов)

Загрузка ...

Jazz coder

Профиль
Группа: Экс. модератор
Сообщений: 2286
Регистрация: 10.8.2003
Где: Москва

Репутация: 6
Всего: 23

gray_k, точно....

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »