Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 14.08.2010, 17:19   #1
IGONZO
 
Регистрация: 17.02.2010
Сообщений: 5
Смех как сделать поиск по dbgrid с помощю ado

помогите плиз новичку как сделать поиск по dbgrid с помощю ado
а то меня точно выпрут из вуза
IGONZO вне форума
Старый 15.08.2010, 08:49   #2
vovk
!=
Участник клуба
 
Аватар для vovk
 
Регистрация: 08.09.2008
Сообщений: 1,751
По умолчанию

наводка- ищем не в TDbgrid, а в TADOTable или TADOQuery методы: Lookup, SetKey, Locate, FindKey ещё возможно пригодится Filter и естественно Filtered. Если TADOQuery, то рекомендую в запросе использовать where. Подробности в справке, если есть конкретные вопросы то задавайте.

ЗЫ На форуме по поиску записей в датасет много что обсуждалось. Сначала воспользуйтесь поиском по форуму.
vovk вне форума
Старый 15.08.2010, 17:42   #3
darknezz
Пользователь
 
Регистрация: 03.08.2010
Сообщений: 16
По умолчанию

Супер поиск!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !
procedure TForm1.Edit1Change(Sender: TObject);
begin
if length(form1.Edit1.Text)>0 then
form1.ADOTable1.Filtered:=true
else
form1.ADOTable1.Filtered:=false;
form1.ADOTable1.Filter:='Name>'''+f orm1.Edit1.Text+'''';
end;
darknezz вне форума
Старый 15.08.2010, 21:49   #4
IGONZO
 
Регистрация: 17.02.2010
Сообщений: 5
По умолчанию

Цитата:
Сообщение от darknezz Посмотреть сообщение
Супер поиск!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !
procedure TForm1.Edit1Change(Sender: TObject);
begin
if length(form1.Edit1.Text)>0 then
form1.ADOTable1.Filtered:=true
else
form1.ADOTable1.Filtered:=false;
form1.ADOTable1.Filter:='Name>'''+f orm1.Edit1.Text+'''';
end;

чето неполучается
IGONZO вне форума
Старый 15.08.2010, 22:20   #5
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

полностью код покажи
Никогда не знаешь, где тебе повезет... (Фрай)
DIgorevich вне форума
Старый 16.08.2010, 03:15   #6
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Думать, думать и еще раз думать надо, товарищ ТС. Вопрос элементарный и много раз обсуждался на форуме. Пользуйся поиском и найдешь ответ на свой вопрос. Закрываю.
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как сделать чтобы во время поиска по таблице не было видно перемещения по dbgrid? alxsev БД в Delphi 4 10.04.2009 19:03
DBGrid: Как сделать собственную сортировку данных? AnTe БД в Delphi 17 26.02.2009 17:38
Как добавлять данные в таблицу выведенную из ACCESS в DBGrid (Delphi ADO) Ce4kok БД в Delphi 26 26.01.2009 20:35
ADO,DBGrid, выпадающий список ikeba БД в Delphi 6 02.11.2008 19:51
Как же мне это сделать? DBgrid khaz Компоненты Delphi 4 12.02.2007 08:58