|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.03.2008, 17:38 | #1 |
Пользователь
Регистрация: 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. прочитат то я почти все по моему прачитал, но конкретно такого примера ни где не нашол. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите пожалуйста сделать поиск по базе данных в форме! 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 |