Поиск и выборки в query

@MoSanya · Регистрация: 16.10.2011

Студворк — интернет-сервис помощи студентам

Доброго времени суток.
У меня в пятницу сдача курсовой, а я ее так со стадии зародыша и не могу вытащить

Помогите пожалуйста. В общем,архив кинул на сервер (1.39 мб), т.к. там несколько форм, тут нет смысла думаю постить все коды.
Проблема такая: При поиске, ввел

Delphi
1
2
3
4
procedure TForm2.edt1Change(Sender: TObject);
begin
  qry1.Locate('probeg',edt1.Text,[loPartialKey, loCaseInsensitive]);
end;

кажется, должен курсор по совпадению перемещаться, а он нет. только на полное совпадение реагирует(
да и при удалении значения, ошибку выдает( не пойму, что за фигня((

В общем, вопросы есть. По ходу я бы задавал, Помогите пожалуйста. А то, чувствую, что без помощи, я не осилю.

Скандербег · 30.11.2013, 07:58

Locate по частичному совпадению в числовых полях не работает.
На какой форме происходит ошибка надо бы сообщать. Удаление авто происходит без ошибки.
Но удалять, если уж так хочется через SQL запрос, принято с помощью другого компонента, а не того же самого,
который показывает данные в гриде.

@MoSanya · 30.11.2013, 22:21 **[ТС]**

Скандербег, Locate по частичному совпадению в числовых полях не работает.
Понял. Спасибо.
Удаление авто происходит без ошибки.
удаление данных с эдита, в котором идет поиск по пробегу. я это имел ввиду. Но, наверное из-за числовых данных это.
МОжете помочь с организацией выборок?

тут вот чего надо:
Выборки:
• Выбрать автомобиль с наименьшим расходом горючего за данный период.
• Выбрать водителей, использующих заданную марку автомобиля.
• Подсчитать количество автомобилей, имеющих плохое техническое состояние.
• Выбрать водителей, которые чаще всего ездят по данному маршруту.

Скандербег · 30.11.2013, 22:41

удаление данных с эдита, в котором идет поиск по пробегу. я это имел ввиду. Но, наверное из-за числовых данных это.

Не мешает проверить есть ли вообще что-либо в едите:

Delphi
1
2
3
4
5
procedure TForm2.edt1Change(Sender: TObject);
begin
  if Edt1.Text <> '' then
    qry1.Locate('probeg',edt1.Text,[loPartialKey, loCaseInsensitive]);
end;

Что понимается под "организацией выборки"?
SQL запросы?

@MoSanya · 30.11.2013, 22:43 **[ТС]**

Скандербег, ага, SQL-запросы.
спасибо за совет

Delphi
1
2
3
4
5
procedure TForm2.edt1Change(Sender: TObject);
begin
  if Edt1.Text <> '' then
    qry1.Locate('probeg',edt1.Text,[loPartialKey, loCaseInsensitive]);
end;

Скандербег · 01.12.2013, 00:15

Один такой:
Выбрать автомобиль с наименьшим расходом горючего за данный период.

SQL
1
2
3
4
5
SELECT a.Nomavto, r.Rashod
FROM avto a, raspisanie r, voditel v
WHERE a.Nomavto = v.Nomavto AND v.Tabelnum = r.Tabelnum AND
r.Rashod=(SELECT MIN(r.Rashod) FROM raspisanie r
    WHER r.Dataviezda>='12.11.2013' AND r.Datapribitiya<='14.11.2013')

@MoSanya · 01.12.2013, 09:25 **[ТС]**

Скандербег, а можете сказать ,как его реализовать? ну как вставить? чего-то я не пойму

у меня это первая связь с query

Добавлено через 25 минут
блин нам дали мет.указания, но тут нету ничего

. По тейблам главное нормально все было, а с куери я попал

Скандербег · 01.12.2013, 10:00

Пример в проекте.
В форме 7, которая вызывается из формы 2 по кнопке "Выборки".

Скандербег · 01.12.2013, 11:51

MoSanya, уважаемый, в БД есть серьезная ошибка, которая не позволяет добавлять больше одной
записи в таблицу расписания для одного и того же водителя.
Происходит это из-за того что поле Tabelnom в упомянутой таблице указано в индексах как первичный ключ (ПК = PK = Primary Key, обозначенный как <Primary>).
Как исправить такую оплошность в BDE я не знаю (разве только удалить таблицу и сделать заново).
Может кто другой из патологоанатомов может подсказать что в этом случае делать.

@MoSanya · 01.12.2013, 23:18 **[ТС]**

Скандербег, удалить базу-думаю не проблема. можно пересоздать, ведь она практически пустая. а что посоветуете примари поставить?
за пример спасибо. щас качать буду, смотреть

@MoSanya · 03.12.2013, 22:31 **[ТС]**

Скандербег, добрый вечер. А я вот базу пересоздал. Для одного водителя оно теперь добавляет разные авто, НО. чего то в Чекбоксе в одну строку пишет. Как этого избежать? или как быть вообще?

Кстати, а не подскажете, вот у меня там, если обратили внимание, картинки должны быть еще. Но они чего то не работают

Скандербег · 03.12.2013, 22:55

Что за "чекбокс"? Нет таких на просторах проекта...
Один и тот же водитель прикреплены к разным авто? Странновато.
Если водители и прикрепленные к ним авто не в отдельных таблицах, то в таблице "водитель"
не может находится один и тот же водитель в нескольких строках.

@MoSanya · 03.12.2013, 22:58 **[ТС]**

Скандербег, ну вот есть такой момент у меня в задании

Один и тот же автомобиль может использоваться разными водителями и один водитель может использовать разные автомобили.

прошу прощения, и имел ввиду дблуккомбобокс. попробуйте запустить, увидите думаю. пару записей на одного водилу создайте.

Скандербег · 03.12.2013, 23:09

Если в задании допускается один водитель на разные автомобили, то
в этом случае нужно разделить водителей и прикрепленные к ним авто на две таблицы.
Потому как при этом таблица "водители" уже не является таковой, а становиться таблицей
прикрепления автомобилей к водителям.
Отсюда и получается, что сейчас нельзя лукапкомбобокс использовать с таблицей водителей, потому как
в его списке будут дубликаты водителей. Что, собственно, и наблюдается.
Следовательно, если неохота делать две таблицы (где в одной только водители, которые есть, а в другой
ссылки на них и закрепленные за ними автомобили), то тогда нужно применять простой комбобокс, в который
загонять водителей из таблицы "водители" без дубликатов.

В общем, как ни крути, а неправильно спроектированная база постоянно приносит
проблемы и необходимость их решать.

Не по теме:

А без BDE никак нельзя? Может быть обратить взор на Аксесс...

@MoSanya · 03.12.2013, 23:12 **[ТС]**

Скандербег, к сожелению нельзя без БДЕ. Заданее таковое

с таблицами опять не догоняю

как можно это так красиво реализовать?
Впринцыпе, пока база пустая. я еще могу прыгать и скакать, только вот уже поднадоело, хотелось бы сделать и все. заняться правами доступов.

Скандербег · 03.12.2013, 23:16

А однострочный лукап - это баг в Дельфи 7. При некоторой ситуации это проходит. Но может появляться независимо от воли разработчика.

@MoSanya · 03.12.2013, 23:17 **[ТС]**

Скандербег, ну тут не поспоришь

Скандербег · 03.12.2013, 23:18

Ну если надоело, то тогда надо так и оставить - чего суетится.
Щас только поправлю лукапкомбобокс на простой комбобокс.

@MoSanya · 03.12.2013, 23:19 **[ТС]**

Скандербег, Окай. А оно не будет при каждом запуске программы обновляться? с талицы авто будет подкачивать сохраненные данные?

Скандербег · 03.12.2013, 23:22

Надо сделать так чтобы обновлялось. Щас поэкспериментирую.

Новые блоги и статьи Все статьи Все блоги /
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	30.11.2013, 07:58
	Locate по частичному совпадению в числовых полях не работает. На какой форме происходит ошибка надо бы сообщать. Удаление авто происходит без ошибки. Но удалять, если уж так хочется через SQL запрос, принято с помощью другого компонента, а не того же самого, который показывает данные в гриде. 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	30.11.2013, 22:21 [ТС]
	Скандербег, Locate по частичному совпадению в числовых полях не работает. Понял. Спасибо. Удаление авто происходит без ошибки. удаление данных с эдита, в котором идет поиск по пробегу. я это имел ввиду. Но, наверное из-за числовых данных это. МОжете помочь с организацией выборок? тут вот чего надо: Выборки: • Выбрать автомобиль с наименьшим расходом горючего за данный период. • Выбрать водителей, использующих заданную марку автомобиля. • Подсчитать количество автомобилей, имеющих плохое техническое состояние. • Выбрать водителей, которые чаще всего ездят по данному маршруту. 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	01.12.2013, 09:25 [ТС]
	Скандербег, а можете сказать ,как его реализовать? ну как вставить? чего-то я не пойму у меня это первая связь с query Добавлено через 25 минут блин нам дали мет.указания, но тут нету ничего . По тейблам главное нормально все было, а с куери я попал 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	01.12.2013, 11:51
	MoSanya, уважаемый, в БД есть серьезная ошибка, которая не позволяет добавлять больше одной записи в таблицу расписания для одного и того же водителя. Происходит это из-за того что поле Tabelnom в упомянутой таблице указано в индексах как первичный ключ (ПК = PK = Primary Key, обозначенный как <Primary>). Как исправить такую оплошность в BDE я не знаю (разве только удалить таблицу и сделать заново). Может кто другой из патологоанатомов может подсказать что в этом случае делать. 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	01.12.2013, 23:18 [ТС]
	Скандербег, удалить базу-думаю не проблема. можно пересоздать, ведь она практически пустая. а что посоветуете примари поставить? за пример спасибо. щас качать буду, смотреть 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	03.12.2013, 22:55
	Что за "чекбокс"? Нет таких на просторах проекта... Один и тот же водитель прикреплены к разным авто? Странновато. Если водители и прикрепленные к ним авто не в отдельных таблицах, то в таблице "водитель" не может находится один и тот же водитель в нескольких строках. 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	03.12.2013, 23:09
	Если в задании допускается один водитель на разные автомобили, то в этом случае нужно разделить водителей и прикрепленные к ним авто на две таблицы. Потому как при этом таблица "водители" уже не является таковой, а становиться таблицей прикрепления автомобилей к водителям. Отсюда и получается, что сейчас нельзя лукапкомбобокс использовать с таблицей водителей, потому как в его списке будут дубликаты водителей. Что, собственно, и наблюдается. Следовательно, если неохота делать две таблицы (где в одной только водители, которые есть, а в другой ссылки на них и закрепленные за ними автомобили), то тогда нужно применять простой комбобокс, в который загонять водителей из таблицы "водители" без дубликатов. В общем, как ни крути, а неправильно спроектированная база постоянно приносит проблемы и необходимость их решать. Не по теме: А без BDE никак нельзя? Может быть обратить взор на Аксесс... 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	03.12.2013, 23:12 [ТС]
	Скандербег, к сожелению нельзя без БДЕ. Заданее таковое с таблицами опять не догоняю как можно это так красиво реализовать? Впринцыпе, пока база пустая. я еще могу прыгать и скакать, только вот уже поднадоело, хотелось бы сделать и все. заняться правами доступов. 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	03.12.2013, 23:16
	А однострочный лукап - это баг в Дельфи 7. При некоторой ситуации это проходит. Но может появляться независимо от воли разработчика. 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	03.12.2013, 23:17 [ТС]
	Скандербег, ну тут не поспоришь 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	03.12.2013, 23:18
	Ну если надоело, то тогда надо так и оставить - чего суетится. Щас только поправлю лукапкомбобокс на простой комбобокс. 0

@MoSanya 6 / 6 / 2 Регистрация: 16.10.2011 Сообщений: 226
	03.12.2013, 23:19 [ТС]
	Скандербег, Окай. А оно не будет при каждом запуске программы обновляться? с талицы авто будет подкачивать сохраненные данные? 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	03.12.2013, 23:22
	Надо сделать так чтобы обновлялось. Щас поэкспериментирую. 1