0 / 0 / 1
Регистрация: 07.09.2012
Сообщений: 58

БД ацес в delphi кнопка ПОИСК

25.12.2012, 23:13. Показов 7938. Ответов 13
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте! у меня бада данных ацесс в дельфи. мне нужно сделать так. вводить имя человека в edit и при нажатий на button чтобы эта строка выделялась и выходила в мемо. и еще как сделать сортировку по алфавиту по возрасту и т.д. спасибо!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.12.2012, 23:13
Ответы с готовыми решениями:

Кнопка Delphi
У меня есть 3 программы можно ли сделать 1 программу но чтобы на форме было 3 кнопки и по нажатию на 1 из кнопок вкючалась соответствующая...

Кнопка Delphi
Как сделать, чтобы при нажатии на Speedbutton издавался звук?

Кнопка 'Сохранить' в Delphi
Я создал 4 формы в Delphi и связал их кнопкой Далее. Затем на последней четвертой форме создал кнопку Сохранить, чтобы все данные...

13
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,603
26.12.2012, 00:38
Цитата Сообщение от ms_dos Посмотреть сообщение
Здравствуйте! у меня бада данных ацесс в дельфи. мне нужно сделать так. вводить имя человека в edit и при нажатий на button чтобы эта строка выделялась и выходила в мемо. и еще как сделать сортировку по алфавиту по возрасту и т.д. спасибо!
Что не нашли такой тема форуме 100 раз обсудили , или вас индивидуально хотите объяснить ?
0
43 / 27 / 6
Регистрация: 27.09.2011
Сообщений: 280
26.12.2012, 11:23
ms_dos,
Поиск Имя таблицы('Имя поля таблицы',Edit.text,[]);

Пример
Delphi
1
DM.ADOTable_Ecsponat.Locate('E_NAME',LabeledEdit2.Text,[]);
Сортировка
Delphi
1
DM.ADOTable_Prod.Sort :=  Col + ' ' + Dir;
Dir - как сортировать ( по увыванию ('DESC') и по возрастанию ('ASC'))
Col - имя поля таблицы

Пример
Delphi
1
DM.ADOTable_Prod.Sort :=  Col + ' ' + Dir;
0
0 / 0 / 0
Регистрация: 27.12.2012
Сообщений: 24
27.12.2012, 01:53
Короче я попробывал зделать получилось только в мемо не делал а зделал связку с бд похоже на edit ну посмотри оцени как зделал потом скажешь если чё нада добавить!!!
Вложения
Тип файла: rar делфи.rar (329.8 Кб, 97 просмотров)
0
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,603
27.12.2012, 02:22
Цитата Сообщение от killere0 Посмотреть сообщение
Короче я попробывал зделать получилось только в мемо не делал а зделал связку с бд похоже на edit ну посмотри оцени как зделал потом скажешь если чё нада добавить!!!
Я скажу {Молодец} видно что читаешь книгу и хочешь учить ! Но хочу тебя малинки советь ! Всегда луче использовать ADOQuery1 для выбор таблицу , ADOQuery1 предназначено для SQL запросов и лучи что вы в месте Delphi начинали изучить язык SQL это обязательно нужно когда работаете с база данных.
и ADOConnection1 лишни пут надо удалить. поиск луче делайте так

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.Edit1Change(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT* FROM Пассажиры');
ADOQuery1.SQL.Add('WHERE [Имя] LIKE '''+Edit1.Text+ '%' +'''');
ADOQuery1.Open;
 
 
end;
 
end.
Миниатюры
БД ацес в delphi кнопка ПОИСК  
Вложения
Тип файла: rar делфи2.rar (496.9 Кб, 88 просмотров)
1
0 / 0 / 0
Регистрация: 27.12.2012
Сообщений: 24
27.12.2012, 14:36
Кстати да я про это забыл спасибо что сказал
0
0 / 0 / 1
Регистрация: 07.09.2012
Сообщений: 58
27.12.2012, 18:23  [ТС]
СПАСИБО ДРУЗЬЯ МОИ =) все работает спасибо!
0
1 / 1 / 0
Регистрация: 08.06.2016
Сообщений: 153
24.05.2018, 10:27
Объясните, это правильный код поиска данных по бд через текстовое поле и кнопку?
Delphi
1
2
3
4
5
Form2.ADOQuery1.Close;
Form2.ADOQuery1.SQL.Clear;
Form2.ADOQuery1.SQL.Add('SELECT* FROM Физические');
Form2.ADOQuery1.SQL.Add('WHERE [Фамилия] LIKE '''+Edit1.Text+ '%' +'''');
Form2.ADOQuery1.Open;
0
5989 / 4564 / 1096
Регистрация: 29.08.2013
Сообщений: 28,207
Записей в блоге: 3
24.05.2018, 11:59
это не поиск, это отбор данных SQL запросом
и это правильный код если у вас квери лежит на form2 и есть такая таблица с такими полями
0
1 / 1 / 0
Регистрация: 08.06.2016
Сообщений: 153
24.05.2018, 12:37
А можешь подсказать код поиска?
0
Модератор
 Аватар для D1973
9929 / 6467 / 2457
Регистрация: 21.01.2014
Сообщений: 27,425
Записей в блоге: 3
24.05.2018, 15:31
Цитата Сообщение от Lev436 Посмотреть сообщение
А можешь подсказать код поиска?
Читайте про функцию Locate()
Но у меня такое ощущение, что Вам нужен именно выбор данных, удовлетворяющих некоторому условию.
0
1 / 1 / 0
Регистрация: 08.06.2016
Сообщений: 153
26.05.2018, 13:24
Пример поиска этим методом можешь написать?
0
Модератор
 Аватар для D1973
9929 / 6467 / 2457
Регистрация: 21.01.2014
Сообщений: 27,425
Записей в блоге: 3
26.05.2018, 14:52
Пример поиска этим методом в справке можете посмотреть!
0
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,603
26.05.2018, 15:05
Цитата Сообщение от Lev436 Посмотреть сообщение
Пример поиска этим методом можешь написать?
Когда не получается "копи-пастить" бумаю что книга надо почитать
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
26.05.2018, 15:05
Помогаю со студенческими работами здесь

Delphi 7!? Не отжимается кнопка?
Т.е. при клике на кнопку она становится активной (не путать с Enabled), я использую компонент Alpha Skins, парадокс в том что после отпуска...

Кнопка назад для Delphi 7
Не понимаю как тут сделать кнопку , что бы картинка листалась назад. Я программист начинающий, так что и не понимаю. Делаю я...

Кнопка добавления записи в Delphi
что нужно изменить чтоб кнопка добавления работала ??? вот код : unit Unit5; interface uses Windows, Messages,...

Delphi. Поиск суммы в базе данных (Delphi)
Здравствуйте. На Delphi нужно создать базу данных со столбцами Товар, Сумма за единицу и т.д.... Все столбцы заполнены, кроме...

кнопка поиск
на картинке изображена 1- моя кнопка поиска до ввода в неё каких либ чисел 2- перед вводом слова (через параметр "focus") ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
14
Ответ Создать тему
Опции темы

Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru