VPF::Поиск по нескольким полям - Форум программистов

harakiri

Дата 7.5.2011, 22:12 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 44
Регистрация: 17.1.2011

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

Здравствуйте, есть приложение с гридом и четырьмя эдитами. Если эдиты пустые, то в гриде отображается полный список из таблицы. Если ввести в первый эдит условие поиска то в отображаются записи удовлетворяющие условию. Если ввести в два или больше грида, то до должны отображаться записи соответствующие всем условиям. Подскажите, как это реализовать с помощью запроса. Если делаю select * from table where p1 = p and p2 = pp, тогда он ничего не выводит если не заполнено хотя бы одно поле. Если делаю через "or", тогда он выводит запись если хотя б в одном эдите есть правильная запись, а в остальных может быть полная белиберда. Помогите пожалуйста.

maniaks1

Дата 8.5.2011, 09:07 (ссылка)

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

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 55
Регистрация: 16.12.2006

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

ну по идее как то так:

Код



function AddSQL(s,field,value:string):string;
begin
  if value<>'' then begin
    if s<>'' then s:=s+' AND ';
    s:=s+field+'='''+value+'''';
  end;
  AddSQL:=s;
end;

Код



Var sql:string;
begin

  if (Edit1.Text='') and (Edit2.Text='') and (Edit3.Text='') and (Edit4.Text='') then sql:='select * from table'
  else begin
    sql:='';

    sql:=AddSQL(sql, 'pole1', Edit1.Text);
    sql:=AddSQL(sql, 'pole2', Edit2.Text);
    sql:=AddSQL(sql, 'pole3', Edit3.Text);
    sql:=AddSQL(sql, 'pole4', Edit4.Text);

    sql:='select * from table where '+sql;
  end;

  ShowMessage(sql);
end;

т.е. в ручную сформировать запрос

Это сообщение отредактировал(а) maniaks1 - 8.5.2011, 09:08

superVad

Дата 9.5.2011, 10:56 (ссылка)

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

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

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

Мне кажется, что это называется фильтрация, а не поиск.
Пиши через and. Проверяй заполнено ли поле и если там, что то есть, то добавляй это условие в запрос.

harakiri

Дата 10.5.2011, 18:24 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 44
Регистрация: 17.1.2011

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

Всем спасибо за отзывчивость, но нужно сделать именно SP. Как это реализовать на языке SQL?

superVad

Дата 10.5.2011, 20:52 (ссылка)

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

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

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

Что есть SP?

harakiri

Дата 11.5.2011, 18:19 (ссылка)

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

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 44
Регистрация: 17.1.2011

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

хранимая процедура

Vas

Дата 12.5.2011, 09:58 (ссылка)

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

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 830
Регистрация: 29.6.2005
Где: Stavropol region

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

Цитата(harakiri @ 7.5.2011, 22:12

)

Подскажите, как это реализовать с помощью запроса. Если делаю select * from table where p1 = p and p2 = pp, тогда он ничего не выводит если не заполнено хотя бы одно поле. Если делаю через "or", тогда он выводит запись если хотя б в одном эдите есть правильная запись, а в остальных может быть полная белиберда. Помогите пожалуйста.

Цитата(harakiri @ 10.5.2011, 18:24

)

Всем спасибо за отзывчивость, но нужно сделать именно SP. Как это реализовать на языке SQL?

SQL и ХП слегка разные вещи.

Для SQL, как тебе ранее писали, проверяй эдиты на введенные значения и формируй SQL запрос, затем его выполняй и смотри результат.

Для ХП передавай параметры из эдитов, также их проверяй на пустоту и формируй SQL запрос для курсора, открывай и возвращай из курсора выбранные записи.

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

И опыт, сын ошибок трудных, И гений, парадоксов друг, И случай, бог изобретатель. ... (А.С. Пушкин)

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