Поиск по БД не работает с числовыми полями

@Mr.Steroid · Регистрация: 28.09.2009

Студворк — интернет-сервис помощи студентам

Я создал бд в делфи спомощью TQuery и DBGrid! Реализую поиск по баз данных спомощью sql запроса используя Edit и RadioGroup!
Вот процедура поиска:
Код:

Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm3.Edit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  var s : string;
  begin
    datasource1.DataSet:=ADOQuery1;
      if ADOQuery1.Active then ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  S:='Select * From Таблица1 Where '+RadioGroup1.Items.Strings[RadioGroup1.itemindex]+' like '+#39+Edit1.Text+'%'+#39+'Order By №';
  ADOQuery1.SQL.Add(S);
  ADOQuery1.Open;
end;

Этот поиск работает для текстовых полей! Как только дело доходит до чисел появляется ошибка! Помогите написать запрос для поиска по числам!

@Sergiuz · 16.10.2010, 22:04

Сообщение от Mr.Steroid

Order By №'

странный ордер

какая СУБД, какая ошибка??

@Mr.Steroid · 16.10.2010, 22:13 **[ТС]**

Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm5.Edit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var s : string;
  begin
       datasource1.DataSet:=ADOQuery1;
      if ADOQuery1.Active then ADOQuery1.Close;
      ADOQuery1.SQL.Clear;
  S:='Select * From Таблица1 Where '+RadioGroup1.Items.Strings[RadioGroup1.itemindex]+' like '+#39+Edit1.Text+'%'+#39+'Order By Фамилия';
  ADOQuery1.SQL.Add(S);
  ADOQuery1.Open;
  end;

Код организует поиск по БД! Искомое вводится в Edit, а в RadioGroup выбираем столбец(поле) по которому будем искать!
По некоторым столбцам поиск работает, а по некоторым нет! Пишет ошибку:
'ошибка синтаксиса(пропущен оператор) в выражении запроса 'Название кирпича like'1%'''

@reiteriX · 17.10.2010, 00:03

Select *

Order By №

так нельзя. Вы должны использовать имена атрибутов вместо * если хотите сортировки

@Sergiuz · 17.10.2010, 00:06

Mr.Steroid, где то я уже такой запрос читал

и все таки очень не есть красиво имена таблиц и столбцов называть русскими буквами, правда это Ваше право тем более access это допускает. Надеюсь по поводу Mnicrosoft Access я угадал, если да то мои Вам замечание читайте справки они помогают
В СУБД Microsoft access с ключевым слово Like нужно использовать звездочку, как любой элемент. А не как Вы %
Ну вот такой он не хороший

@Sergiuz · 17.10.2010, 00:10

Сообщение от reiteriX

так нельзя. Вы должны использовать имена атрибутов вместо * если хотите сортировки

Скажу по секрету можно в селективном запросе указывать выборку всех полей через звездочку "*"
Главное что бы название поле указанного в сортировке " order " было в таблице, или лучше всего тогда указывать № п/п столбца

@Mr.Steroid · 17.10.2010, 01:16 **[ТС]**

То есть достаточно просто вместо "%" поставить "*" и всё будет Ок?

@Sergiuz · 17.10.2010, 01:19

Mr.Steroid, ну у меня получилось

@Mr.Steroid · 17.10.2010, 01:22 **[ТС]**

А у меня к сожалению нет((

Добавлено через 56 секунд
Таже самая ошибка(

@Sergiuz · 17.10.2010, 01:23

скинь проект с базой

@Mr.Steroid · 17.10.2010, 01:27 **[ТС]**

Распакуйте его в туже папку на диск С. Иначе работать не будет.
Посмотрите например базу "Клиенты". В ней не работают сортировки по "кол-во поддонов" и "наименование кирпича"

@Mr.Steroid · 17.10.2010, 01:29 **[ТС]**

Через 2 мин. вернусь. Надеюсь на вашу помощ.

@Sergiuz · 17.10.2010, 01:32

угум только вышлете еще файл Unit31

@Mr.Steroid · 17.10.2010, 01:35 **[ТС]**

странно! но у меня его нет)

@Sergiuz · 17.10.2010, 01:36

Mr.Steroid, странно он у Вас лежи в корневой папке bin у делфях

Delphi
1
Unit31 in '..\..\Program Files\Borland\Delphi7\Bin\Unit31.pas' {kirprep},

@Mr.Steroid · 17.10.2010, 01:38 **[ТС]**

подождите немного...

@Mr.Steroid · 17.10.2010, 01:41 **[ТС]**

Кажется это он

@Sergiuz · 17.10.2010, 01:43

Вам придется малость подождать закачаю QuickReport

@Mr.Steroid · 17.10.2010, 02:04 **[ТС]**

Закрываете все проекты делфи.
File/Close all
Затем component/install Packages/add/dclqrt70.bpl

Добавлено через 25 секунд
И он должен добавиться

Добавлено через 1 минуту
А! этот файл dclqrt70.bpl находится в папке bin

Добавлено через 14 минут
Не уходите, пожалуйста. Вернусь через пару минут...

@Sergiuz · 17.10.2010, 02:32

У тебя ошибка в названии поля Измени название "К-во кирпича(поддонов)" на такое что бы не было пробелов и дужек, желательно

а запрос выглядит так

SQL
1
SELECT * FROM Таблица1 WHERE ([Кол-вокирпичаподдоны] LIKE '+#39+'2*'+#39+') ORDER BY 1

Добавлено через 5 минут

Не по теме:

И еще скажи кто Вас такому учит что бы таблицы, столбцы были на русском. Та еще с пробелами и круглыми скобками

Новые блоги и статьи Все статьи Все блоги /
Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определенном условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .

@Sergiuz 161 / 159 / 39 Регистрация: 10.10.2010 Сообщений: 461
	17.10.2010, 00:06
	Mr.Steroid, где то я уже такой запрос читал и все таки очень не есть красиво имена таблиц и столбцов называть русскими буквами, правда это Ваше право тем более access это допускает. Надеюсь по поводу Mnicrosoft Access я угадал, если да то мои Вам замечание читайте справки они помогают *В СУБД Microsoft access с ключевым слово Like нужно использовать звездочку, как любой элемент. А не как Вы %* Ну вот такой он не хороший 1

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 01:16 [ТС]
	То есть достаточно просто вместо "%" поставить "*" и всё будет Ок? 0

@Sergiuz 161 / 159 / 39 Регистрация: 10.10.2010 Сообщений: 461
	17.10.2010, 01:19
	Mr.Steroid, ну у меня получилось 0

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 01:22 [ТС]
	А у меня к сожалению нет(( Добавлено через 56 секунд Таже самая ошибка( 0

@Sergiuz 161 / 159 / 39 Регистрация: 10.10.2010 Сообщений: 461
	17.10.2010, 01:23
	скинь проект с базой 0

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 01:29 [ТС]
	Через 2 мин. вернусь. Надеюсь на вашу помощ. 0

@Sergiuz 161 / 159 / 39 Регистрация: 10.10.2010 Сообщений: 461
	17.10.2010, 01:32
	угум только вышлете еще файл Unit31 1

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 01:35 [ТС]
	странно! но у меня его нет) 0

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 01:38 [ТС]
	подождите немного... 0

@Sergiuz 161 / 159 / 39 Регистрация: 10.10.2010 Сообщений: 461
	17.10.2010, 01:43
	Вам придется малость подождать закачаю QuickReport 1

@Mr.Steroid 1 / 1 / 0 Регистрация: 28.09.2009 Сообщений: 37
	17.10.2010, 02:04 [ТС]
	Закрываете все проекты делфи. File/Close all Затем component/install Packages/add/dclqrt70.bpl Добавлено через 25 секунд И он должен добавиться Добавлено через 1 минуту А! этот файл dclqrt70.bpl находится в папке bin Добавлено через 14 минут Не уходите, пожалуйста. Вернусь через пару минут... 0