Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как соуществить поиск в базе 
:(
    Опции темы
Exai1e
Дата 21.3.2007, 18:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 30
Здрасти. 
Например есть таблица с полями medid, medname, medtype и прочее...
каким можно осуществить поиск в таблице по полю medname, например чтобы данные которые надо найти вводились в Edit и при нахождении данных эта запись выделялась в DBGride ?


--------------------
"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"
PM MAIL ICQ   Вверх
a_n_d_y
Дата 21.3.2007, 18:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 81
Регистрация: 23.10.2006
Где: Ukraine::Kiev

Репутация: нет
Всего: 1
какая субд???

если что-нить, что поддерживается BDE, то используй TQuery и не парься)))

в противном случае, используй ADO
PM MAIL ICQ Skype MSN   Вверх
Vas
Дата 21.3.2007, 19:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 23
Всего: 28
TTable.Locate или TQuery.Locate  smile 
Есть еще вариант взять DBGridEh и вообще ниче писать не придется, а только в опциях включить поиск при нажатии клавиш  smile 


--------------------
И опыт, сын ошибок трудных, И гений, парадоксов друг, И случай, бог изобретатель. ... (А.С. Пушкин)
PM MAIL   Вверх
Exai1e
Дата 21.3.2007, 20:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 30
База InterBase
Цитата

TTable.Locate или TQuery.Locate   

эм.. а можно немног поподробнее как именно с этим делом все работать ?
Сорь, я за тупые вопросы.
Спасибо

Это сообщение отредактировал(а) Exai1e - 21.3.2007, 20:17


--------------------
"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"
PM MAIL ICQ   Вверх
Rodman
Дата 22.3.2007, 10:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122
или запрос написать типа 
Код

SELECT medid, medname, medtype, * FROM MyTable 
WHERE (medname like %Param%);



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

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Savek
Дата 22.3.2007, 16:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 355
Регистрация: 10.4.2006
Где: Воронеж

Репутация: 7
Всего: 7
Цитата(Exai1e @  21.3.2007,  20:13 Найти цитируемый пост)
эм.. а можно немног поподробнее как именно с этим делом все работать ?

Примерно так
Код

If Table1.Locate('medname','MyText',[]) then 
   Edit1.Text:=Table1.FieldByname('medname').AsString
else
   Edit1.Text:='';


но это для начала, потом все-равно перейдешь на SQL
PM MAIL   Вверх
Exai1e
Дата 22.3.2007, 19:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 30
Savek, 
Код

procedure TMainForm.Button1Click(Sender: TObject);
begin
  If IBTable1.Locate('medname',Edit1.Text, []) then
    Edit1.Text:=IBTable1.FieldByname('MEDNAME').AsString
  else
   Edit1.Text:='';
end;


Нехочет искать ниче :( 1 раз нашел и все :( при попытке след поиска ниче не происходит.
почему это может быть ?...


--------------------
"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"
PM MAIL ICQ   Вверх
Exai1e
Дата 23.3.2007, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 30
Хмм... почемуто если вводить текст которого нет в базе то все какбы нормально, поле очищается т.к. ничего не найдено, а если вводиш текст который есть в базе, то ниче не происходит :( "стрелочка" в DBGride не перескакивает на найденную запись...


--------------------
"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"
PM MAIL ICQ   Вверх
SergeBS
Дата 23.3.2007, 11:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22
Exai1e, 
Читай про опции locate. Конкретно - loPartialKey.
PM MAIL   Вверх
Exai1e
Дата 23.3.2007, 12:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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

procedure TMainForm.Button1Click(Sender: TObject);
begin
  If IBTable1.Locate('medname',Edit1.Text, [loPartialKey]) then
    Edit1.Text:=IBTable1.FieldByname('MEDNAME').AsString
  else
   Edit1.Text:='';
end;


непомогло


--------------------
"Решение зависит от выбранного геморроя" © Snowy
"у нас как в армии - либо работает, либо так и задумано"
PM MAIL ICQ   Вверх
SergeBS
Дата 23.3.2007, 13:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22
Exai1e, 
Тогда читай дальше про поиск - внизу ссылки. Не первый на грабли наступаешь.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

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


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

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

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0526 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.