powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Поиск наиболее подходящего значения в БД.
4 сообщений из 4, страница 1 из 1
Поиск наиболее подходящего значения в БД.
    #39721666
Wolfire
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте. Может кто сможет подсобить с реализацией поиска наиболее подходящего значения в БД.

Фрагмент кода:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
N_двDBmax:= FloatToStr(StrToFloat(N_двDB)+500);
FDM.QEngine.SQL.Text:=('Select * from Engine where [Мощность на максимальном режиме, кВт] >= '
                       + N_двDB + ' and [Мощность на максимальном режиме, кВт] <= '+N_двDBmax+';');
FDM.QEngine.Open;
mass:=FDM.QEngine.FieldValues['Масса (кг)'];
power:=FDM.QEngine.FieldValues['Мощность на максимальном режиме, кВт'];
MK:=FDM.QEngine.FieldValues['Марка'];



Код рабочий. Но таким образом извлекается первое подходящее значение..
Пробовал изменять максимальное значение, но проблемы начинаются когда максимальное значение столь мало по отношению к минимальному, что ни какое значение из БД попросту не подходит и выдаёт ошибку при поиске
:could not convert variant of type null into type olestr.
Почему выдаёт ошибку - понятно. А вот как это дело решить... В общем буду благодарен за любую информацию по данной теме :)

Модератор: Пользуйтесь тегом (кнопкой) SRC для оформления кода, пожалуйста.
...
Рейтинг: 0 / 0
Поиск наиболее подходящего значения в БД.
    #39721693
Dimitry Sibiryakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
WolfireКод рабочий. Но таким образом извлекается первое подходящее значение..

Открой для себя документацию на метод Next.
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
Поиск наиболее подходящего значения в БД.
    #39721708
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Wolfire,

я бы посоветовал найти определение "подходящее значение".
И одновременно подучить SQL.
Запрос select * from ... where pwr >=x and pwr<=(x+500)
выдаст записи со значениями pwr в нужном интервале, но только в произвольном (том, как хранится) порядке.
Так что было бы неплохо добавить order by pwr desc
и тогда первым значением будет максимально близкое к X+500.
...
Рейтинг: 0 / 0
Поиск наиболее подходящего значения в БД.
    #39724889
Wolfire
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
kdv,
на счёт подучить SQL - Вы правы.
И спасибо за то что подсказали решение моей проблемы. Хотя в моём случае нужно использовать order by pwr asc .
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Поиск наиболее подходящего значения в БД.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]