Sql + Delphi =\, Проблема Опции

[BuHHu nyx]

Дали мне задание составить маленькую табличку(типа бд) и программку написать для неё... Да всё это дело на дельфях... Так всё бы ничего, если только не одна проблема - как обычно надо делать поиск. Ищу вот так:

Код

  with form1.Query1 do begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT Name, Type, Time, Actor, Memo');
  SQL.Add('FROM ":video:video.db"');
  SQL.Add('WHERE');
  SQL.Add('(Actor = "'+ Actor + '")');
  SQL.Add('ORDER BY Name');
  Open;
  end;
if Query1.RecordCount <> 0 then
  DataSource1.DataSet:=Query1
else
  ShowMessage('В БД ничего не найдено.');

Вот только не работает эта штука... Вот что выдаёт дебаггер(или кто там?):
И указывает после нажатия "Ок" на строку "end." про самом проекте ;-)
Что делать? Сроки горят...

[leah]

Дали мне задание составить маленькую табличку(типа бд) и программку написать для неё... Да всё это дело на дельфях... Так всё бы ничего, если только не одна проблема - как обычно надо делать поиск. Ищу вот так:

Код

  with form1.Query1 do begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT Name, Type, Time, Actor, Memo');
  SQL.Add('FROM ":video:video.db"');
  SQL.Add('WHERE');
  SQL.Add('(Actor = "'+ Actor + '")');
  SQL.Add('ORDER BY Name');
  Open;
  end;
if Query1.RecordCount <> 0 then
  DataSource1.DataSet:=Query1
else
  ShowMessage('В БД ничего не найдено.');

Вот только не работает эта штука... Вот что выдаёт дебаггер(или кто там?):
И указывает после нажатия "Ок" на строку "end." про самом проекте ;-)
Что делать? Сроки горят...

Оно тебе пишет, что слово Time неправильное! Т.е. это слово зарезервировано в SQL также как слова: date, timestamp, integer, varchar, table, where, order и т.п.
Если сам создавал свою таблицу, то смени название столбца с Time на например TTime или указывай названия столбцов в одинарных кавычках. Но лучше сменить название поля.
Я бы на всякий случай еще и Type поменял бы.

Сообщение отредактировано leah - 5.06.2007 - 21:35

[BuHHu nyx]

Спасибо... Только всё равно поиск не работает... =\
И ещё: по идее вот это вот должно упорялочить таблицу по Name. Верно?

Код

  SQL.Add('SELECT *');
  SQL.Add('FROM ":video:video.db"');
  SQL.Add('ORDER BY Name');
  Open;

Но ничего, кроме этого не происходит:

[leah]

Спасибо... Только всё равно поиск не работает... =\
И ещё: по идее вот это вот должно упорялочить таблицу по Name. Верно?

Код

  SQL.Add('SELECT *');
  SQL.Add('FROM ":video:video.db"');
  SQL.Add('ORDER BY Name');
  Open;

Но ничего, кроме этого не происходит:

Да верно! Сам запрос то исполняется не из дельфи? Я в дельфи не силен, просто увидел в первом посте явную ошибку в самом sql.

Вот посмотри, нашел тебе ]]>http://www.codenet.ru/progr/delphi/stat/SQL-Delphi.php]]>

Сообщение отредактировано leah - 5.06.2007 - 22:32

[Oracle]

И ещё: по идее вот это вот должно упорялочить таблицу по Name. Верно?

Упорядочится вывод результата запроса, а не таблица.

[BuHHu nyx]

Да, я это и хотел сказать =)
Всем спасибо, все свободны, всё разрулилось -)