Короче, вот пример проектика "поиск по базе данных"
Он включает в себя три вида поиска: 1) строка целиком; 2) каждое слово из строки; 3) Смешанный поиск.
Из компонентов быз данных используется всего лишь три вещи: Query, DataBase, DBGrid (для вывода инфы).
Короче, там всё понятно.

Постарался реализовать

Цитата

а вот теперь думаю, что может можно как-то это через один столбик сделать?

P. S.
Использована таблица Paradox, но всё это через ADOQuery будет выглядеть так же...


Присоединённый файл ( Кол-во скачиваний: 21 )
 SearchDB.rar

Pakshin A. S.
Подскажи пожалуйста, что такое '%' и '*'. Это ASCII-коды? Если да, то чего?
А #39 - это пробел?

'%' - символ для SQL запроса, означающий, что после некоторого сочетания символов до знака % может стоять сколько угодно символов
Пример:
есть две записи
asdf
ased
Используя запрос с where Something Like 'as%'
Мы получим эти две записи.

'*' - символ, взятый из поиска файлов в Wind'е. Т. е. привычный заменитель сивола % для SQL...
#39 - одна ковычка '

ASCII код - число, напимер 39 - это код символа '

Цитата

Pakshin A. S. Вроде бы уже и работает эта несчастная прога, только ищет почему-то только все слово, а не все слова на введенную букву Я делаю через параметры, в свойстве SQL запроса еще до запуска проги пишу Код SELECT Termin FROM Slovnyk WHERE Termin LIKE :param Потом в программе пишу Код dmodule.ADOQuery1.Active:=false; dmodule.ADOQuery1.Parameters.ParamByName('param').Value:=Edtslovo.Text; dmodule.ADOQuery1.Active:=true; DbLstbx.DataField:='termin'; while not dmodule.ADOQuery1.Eof do begin DBLstBx.Items.Add(dmodule.ADOQuery1.Fields[0].AsString); dmodule.ADOQuery1.Next; end; Наверное, надо что-то добавить в тексте запроса, но что? Я уже все перепробовала, что только можно

Код

dmodule.ADOQuery1.Active:=false; dmodule.ADOQuery1.Parameters.ParamByName('param').Value:=Edtslovo.Text+'%';// вся фишка в проценте! dmodule.ADOQuery1.Active:=true; DbLstbx.DataField:='termin'; while not dmodule.ADOQuery1.Eof do begin DBLstBx.Items.Add(dmodule.ADOQuery1.Fields[0].AsString); dmodule.ADOQuery1.Next; end;

щас проверим

Pakshin A. S.

Маленький вопросик:

имеем к примеру в базе списочек
-абрикос
-ананас
-апельсин

при использовании ORDER BY при введении буквы а оно почему-то переводит курсор на апельсин, а надо бы на абрикос

как быть?

А если так?

Код

ORDER BY FieldName DESC

Код

SELECT * FROM SomeTable WHERE SomeField LIKE 'а%' ORDER BY SomeField

100% запрос!!!

Так ну 1 что я вижу это то, что в строке подключения не задан Locale Identifier я бы написал так

Код

ADOConnection1.ConnectionString := 'Provider = Microsoft.Jet.4.0; Data Source = C:\Base; Locale Identifier = 1049';

Второе не совсем понятно как была создана таблица, установлена ли кодировка символов и COLLATE при создании поля.
Но на сколько мне известно COLLATE можно установить и при выполнении sql запроса.

Как это делается в InterBase и его клонах написано здесь http://www.ibase.ru/devinfo/ibrusfaq.htm

Для вашего случая я бы вам посоветовал написать ORDER BY SomeField COLLATE cp1251

Pakshin A. S.

со * не проходит, у меня первое поле - счетчик, оно мне и выдает его
я пробовала нажать два раза на объект ADOQuery, там в окошке ( не знаю как оно называется) добавить все записи, а потом оставить только нужную, но тогда курсор все равно переезжает на апелисин, а не абрикос
все это странно

1) Alex - умный, попробуй как он советует...
2) Если правильно пнял, то нуна следующее:

Код

Select Field1,Field2,Field3 from SomeTable where Field1 Like 'а%' order by Field1 COLLATE cp1251

Вообще это всё походит на уроки SQL. В разделе "базу данных" есть замечательный учебник. Советую его почитать на досуге, если хочешь реально овлательно навыками создания баз даннух и работы с ними через язык SQL-запросов!

Цитата(Pakshin @ 25.10.2004, 22:04)

1) Alex - умный, попробуй как он советует...

Да ладно тебе, просто человек сам наступал на эти грабли

Добого времени суток! Подскажите пожалуйста. Пишу программу работы с БД в Acess, связь через ADO. Записи главной таблицы разнесены по вкладкам TabSheet, на каждой вкладке сгрупппированы по параметрам. Необходимо реализовать поиск следующим образом: с помощью RadioButton-ов выбирается параметр поиска, или же можно CheckBox-ами. Есть Edit, в который вводится слово для поиска. Как реализовать, чтоб в DBGrid-е курсор ставился не только на первую найденную запись, а можно было по нажатию кнопки, к примеру, переходить к следующей записи и т.д. удовлетворяющей параметру поиска. Или же выбирается параметр поиска (столбец  таблицы), затем в Edit-е пишется слово для поиска, и выводятся все найденные слова. Locate выводит лишь одну запись:

 
С Table.Filtered у меня не получилось, при вводе целого слова в DBGrid-е все поля исчезают  



Или можно это  реализовать как-то с помощью SQL-запроса? Т.е. пользователь вводит слово для поиска в Edit, указывает галочкой или несколькими нужный параметр, это передаётся в SQL-запрос заготовку, затем в DBGrid-е отображается результаты поиска записей удовлетворяющих параметрам?  

Кидаешь AdoQuery, в который запросом выводишь нужную инфу (т.е. все записи, в которых встречается FindEdit.Text). Его можно привязать к DBGrid'у. Только лучше взять так:

Т.е. для каждого столбца таблицы будет свой ADOQuery? А если к примеру не RadioButton-ами указывать  параметры поиска, а CheckBox-ами, то запросов будет больше? Можно ли как-то уменьшить число запросов? Или всё делается одним запросом?

p.s. Всё разобрался сам. Нужен всего один запрос, просто для каждого RadioButton-а в процедуре нажатия кнопки запрос переписывается заново, а результат вывожу в другой форме, не затрагивая основной DBGrid. Например:




Это сообщение отредактировал(а) Veniamin - 13.5.2008, 16:58