|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
поиск и вывод при условии
Здравствуйте! я новичёк в делфи!
есть таблица с 4-ми полями номер, ***название***,кол-во,кабинет при sql.Add('select * from organized where Title like'+help2); выводятся записи с ***названием*** которое вводишь в edit1 но нужно ещё в edit2 поставить цифру , выводятся все поля с номером кабинета(это работает) и вот тут загвоздка, как сделать чтоб при заполнении первoго edit1 показывали записи только с определённым кабинетом? т.е. в edit2 написал 5 и поиск шел только по записям где в поле кабинет указано "5" что-то типа вот этого sql.Add('select * from organized where Title like'+help2 +'and classroom'+edit2.Text); как edit2 прицепить к полю "кабинет"? вроде доступно написал, спасибо! sql.Add('select * from organized where Title like'+help2+ classroom:=edit2.Text); может так? ещё способ придумал, но ошибку выдаёт Код:
procedure TForm1.Edit1Change(Sender: TObject); var help1, help2, help3, help4: string; begin //Edit2.Text:=''; help1:='%'+ Form1.Edit1.Text+'%'; help2:=Quotedstr(help1); help3:=Form1.Edit2.Text; help4:=Quotedstr(help1); With Form1.ADOQuery1 do begin close; sql.Clear; sql.Add('select * from organized where Title like'+help2+' and classroom'+help4); open; end; end; Последний раз редактировалось lmikle, 22.06.2015 в 06:06. |
#2
|
||||
|
||||
В Дельфи есть замечательное средство - отладка называется. Установите точку останова на строчке:
Код:
open; Думаю вам все станет понятно. Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
|||
|
|||
здравствуйте написано гуру...
прочтите своё сообщение и скажите где помощь? я сам 11 часов тыкал и получилось вот какая должна быть помощь: Код:
procedure TForm1.Edit1Change(Sender: TObject); begin ADOQuery1.SQL.Clear; ADOQuery1.SQL.Text := 'SELECT * FROM organized WHERE Title Like "%' + Edit1.Text + '%"'+ 'and classroom like" + Edit2"'; ADOQuery1.Open; end; надеюсь в будущем будет адекватная помощь. Спасибо! Последний раз редактировалось lmikle, 22.06.2015 в 06:07. |
#4
|
||||
|
||||
И вам не хворать уважаемый неофит,
хорошо бы для начала правила форума почитать, научиться тегами пользоваться, да и вопросы попробовать адекватно задавать, а то иначе желание помогать вам исчезает начисто Я не понял Вашего вопроса, но всё же Вам на него отвечу! Последний раз редактировалось Alegun, 22.06.2015 в 00:36. Причина: наркалым тунге |
#5
|
|||
|
|||
может Вы всегда и правы(от Ивана Грозного тоже толка не было, зато всегда прав)
буду код в кавычки брать куда уж адекватней? как для ребёнка объяснил какое желание, если не умеешь?(если бы знал, то написал как надо, или хоть какой то вопрос задал, что я хочу сделать!) |
#6
|
||||
|
||||
Я предложил вам способ решения проблемы, а вы видимо ожидали готового ответа. На мой взгляд, мой вариант лучше т.к. позволяет решить проблему и научить вас новому и полезному.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |