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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 14.03.2008, 17:38   #1
bmb_66
Пользователь
 
Регистрация: 11.12.2007
Сообщений: 39
По умолчанию апят пра поиск в базе данных

Привет всем программистам которие не осуждают тех которие только што начинают, потому что кагдата ани били начинаюшими.
Прастите меня за настирние вапроси но я начинаюши, саздаю сваю первую пачти что серёзную программу и мне нужна чтоб меня чут-чут подтолкнули.
ПРОГРАММА телефонны справочник.
саздал форму расположил на нём три Edit (телефон, фамилиа, имя), кнопку для вивода запроса.

SQL запрос.
SELECT*
FROM TMosaxleoba
WHERE mtelefoni LIKE:MTelefoni OR mgvari LIKE:MGvari OR msaxeli LIKE:MSaxeli

а код при клике кнопки

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if (Edit1.Text<>'') or (Edit2.Text<>'') or (Edit3.Text<>'') then
begin
DataModule4.ADOQuery1.Active:=false ;
DataModule4.ADOQuery1.Parameters.Pa ramByName('MTelefoni').Value:=Edit1 .Text;
DataModule4.ADOQuery1.Parameters.Pa ramByName('MGvari').Value:=Edit2.Te xt;
DataModule4.ADOQuery1.Parameters.Pa ramByName('МСахели').Value:=Edit3.T ext;
DataModule4.ADOQuery1.Active:=true;
Form5.Show;
Edit1.Clear;
Edit2.Clear;
Edit3.Clear;
Form6.Hide;
end

работат всё почти что нормально работает, но кагда заполняю Edit1 виводится запрос по телефону. кагда заполняю Edit2 виводится запрос и по телефону и по фамилии. кагда заполняю Edit3 виводится запрос и по телефону и по фамилии и по имени хотя очистка у меня поставлена в коде.
как мне переделат и код и запрос чтоби заполняя фамилиу и конкретное имя виводилас только сообшение об етои конкретнои фамилие и имени а не все сразу.

P.S. прочитат то я почти все по моему прачитал, но конкретно такого примера ни где не нашол.
bmb_66 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуйста сделать поиск по базе данных в форме! Access 2003 LilijaSt Microsoft Office Access 19 25.12.2010 10:13
Поиск по базе данных ERASERROR БД в Delphi 4 14.03.2008 16:34
EXCEL поиск по базе и сопоставление данных lomax Microsoft Office Excel 4 10.02.2007 22:04