Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #3  
Старый 24.11.2010, 16:16
270787 270787 вне форума
Прохожий
 
Регистрация: 22.11.2010
Сообщения: 3
Репутация: 10
По умолчанию

Цитата:
Сообщение от Страдалецъ
Вы неправильно по любому формируете запрос.
У вас предполагается несколько условий а их надо отделять друг от друга логической связкой OR или AND. Если какое-то условие нам не надо, то переменная для него уже будет равна ''. Есть еще пара подводных камней, но это уже после того как поправите свой код.
У меня это реализовано:
1.Задаем счетчик
Код:
z:=0;
2. если выполняется условие, то z=1
Код:
  if agent.Text <> '' then
      begin
      a:= 'CLIENT='+ agent.Text;
          z:=z+1;
      end;
3.Проверка - если если 'CHECK=' идет "вторым по счету" прибавляем AND
Код:
 if knp.Text <> '' then
      begin
      k:= 'CHECK='+ knp.Text;
            z:=z+1;
            if z>1   then begin k:= 'and '+k;   end;
3. Если в agent.Text пусто, то получается, что первое условие не выполняется(z=0),
второе выполняется(z=1),
if z>1 then begin k:= 'and '+k; end; -не проходит
т.е and не добавляется


Сам запрос:
Код:
adoQuery1.sql.Add('select * from OPEN where '+a +k);

Последний раз редактировалось 270787, 24.11.2010 в 16:18.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:37.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025