Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Delphi6 - SQL

Lord © (2004-07-01 14:30:00)
Помогите пожалуйста разобраться.
Почему при данном кодинге:

begin
if (RadioButton1.Checked=false)and
(RadioButton4.Checked=false)then otch:=0;
case otch of
0:ShowMessage('Выберите форму отчёта');
1:begin
with Form5.Query1 do
begin
Close;
SQL.Clear;
SQL.add('select Numb.NPoz, Mark.Param, Mark.Marka, Numb.NZav,');
SQL.add('Numb.Jan, Numb.Feb, Numb.Mach, Numb.Apr, Numb.May, Numb.Jun, Numb.Jul, Numb.Avg,');
SQL.add('Numb.Sep, Numb.Oct, Numb.Nov, Numb.Des, Numb.MUst from Numb, Mark where');
SQL.add('(Numb.Marka=Mark.Marka)and(Numb.Zex=:a)and((Numb.Jan=TO%)or');
SQL.add('(Numb.Feb=TO%)or(Numb.Mach=TO%)or(Numb.Apr=TO%)or(Numb.May=TO%)or');
SQL.add('(Numb.Jun=TO%)or(Numb.Jul=TO%)or(Numb.Avg=TO%)or(Numb.Sep=TO%)or');
SQL.add('(Numb.Oct=TO%)or(Numb.Nov=TO%)or(Numb.Des=TO%))'); ParamByName'a').AsInteger:=StrToInt (Form1.Edit1.Text);
Open;
end;
end;
.
.
.
end;

вылезает такая ошибка: "Invalid use of keyword
Token: Avg,
Numb.Sep,
Line Number: 2"

bushmen (2004-07-01 16:36:00) [1]
>И и нтересно, что же такое ты пытаешся в месяце найти, что называется на ТО???

Технический осмотр :)))))

Соловьев (2004-07-01 16:04:00) [2]

> '(Numb.Jun=TO%)

вообще-то надо в одинарные кавычки брать. И и нтересно, что же такое ты пытаешся в месяце найти, что называется на ТО???

Lord (2004-07-01 15:58:00) [3]
% - любой сивол после текущего, а со скобкой здесь опечатка вышла.
Вобщем всем огромное спасибо за отклики.

Соловьев (2004-07-01 14:53:00) [4]

> меняй поле и все будет ОК

можно и не менять

> Numb.Avg

Numb."Avg"

GanibalLector (2004-07-01 14:48:00) [5]
Avg -это точно.В нем трабл!

MORA (2004-07-01 14:48:00) [6]
AVG - это функция усреднения используемая при группировке (group by...)

GanibalLector (2004-07-01 14:48:00) [7]
меняй поле и все будет ОК

GanibalLector (2004-07-01 14:46:00) [8]
а ты запрос то проверел на выполнение???ну, например в IBExperte или в IBConsole.
или может делать что-то типа SQL.add('тратата'+
'тата'+
'тата')

Sandman25 (2004-07-01 14:40:00) [9]
Avg -зарезервированное слово

bushmen (2004-07-01 14:35:00) [10]
>Numb.Oct=TO%

Это что такое?

>ParamByName'a').AsInteger:=

Где поткрял скобку?

Наверх

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