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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 22.05.2015, 15:07
yuoras yuoras вне форума
Прохожий
 
Регистрация: 11.03.2014
Сообщения: 48
Версия Delphi: Delphi 7(4.453)
Репутация: 10
По умолчанию Поиск по одному и нескольким значениям в БД MSSQL 2005

Продолжение темы http://www.delphisources.ru/forum/sh...ad.php?t=25828
Ребята ,помогите добить запрос.
#22 сообщении запрос работает только при указании одного из столбцов.

Как мне расширить поиск?.
То есть ,сделать поиск более точным, указать и "street" и "kvart"

Заранее благодарен!!
Ответить с цитированием
  #2  
Старый 23.05.2015, 22:03
sailen sailen вне форума
Прохожий
 
Регистрация: 27.02.2013
Сообщения: 19
Репутация: 10
По умолчанию

Код:
procedure form1.BitBtn1Click(Sender: TObject);
begin

adoquery1.SQL.Clear;
adoquery1.SQL.Add('SELECT *');
adoquery1.SQL.Add('FROM ТАБЛИЦА');

  if (Length(Edit1.Text) > 0) or
     (Length(Edit2.Text) > 0) then
   then

     begin
     adoquery1.SQL.Add('where street LIKE'''+Edit1.Text+'''AND');
     adoquery1.SQL.Add('kvartl LIKE' + #39 + Edit2.Text + '%' + #39);
     adoquery1.Active:= true;
     end
   else
     begin
     adoquery1.Active:= True;
     adoquery1.First;
     end;
end;
Админ: Пользуемся тегами для оформления кода!

Последний раз редактировалось Admin, 24.05.2015 в 13:34.
Ответить с цитированием
  #3  
Старый 24.05.2015, 12:11
starcon starcon вне форума
Новичок
 
Регистрация: 15.03.2014
Сообщения: 84
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Спасибо.
К сожалению , не работает , даже не работает поиск по одному значению.
Вот полный проект https://yadi.sk/d/Q7nkGR4dgqDKH

Последний раз редактировалось starcon, 24.05.2015 в 12:53.
Ответить с цитированием
  #4  
Старый 24.05.2015, 12:15
sailen sailen вне форума
Прохожий
 
Регистрация: 27.02.2013
Сообщения: 19
Репутация: 10
По умолчанию

кинь исходник может помогу
Ответить с цитированием
  #5  
Старый 24.05.2015, 13:14
starcon starcon вне форума
Новичок
 
Регистрация: 15.03.2014
Сообщения: 84
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Ссылка в #3 сообщении
Ответить с цитированием
  #6  
Старый 24.05.2015, 14:07
sailen sailen вне форума
Прохожий
 
Регистрация: 27.02.2013
Сообщения: 19
Репутация: 10
По умолчанию

Пробуй должно работать
Вложения
Тип файла: rar Поиск.rar (1.45 Мбайт, 4 просмотров)
Ответить с цитированием
Этот пользователь сказал Спасибо sailen за это полезное сообщение:
starcon (24.05.2015)
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter