Выделить улицу из адресной структуры

@SeGun · Регистрация: 23.05.2015

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

Добрый день народ.
Имеется адресная структура в виде строки в базе данных
Таблица HOUSES
в ней поля
cod_h - Индекс (первичный ключ)
haddr - текстовое поле содержащее адрес следующей структуры:

Пример:
424019, Респ Марий Эл, г Йошкар-Ола, ул Анникова, д. 7

Запятые делят структуру на блоки:
1. Индекс
2. Республика
3. Город
4. Улица или территория например(сквер Некрасова)
5. Номер дома

Возможен вариант:
Пример
142050, обл Московская, г Домодедово, д Артемьево, ул Кедровая, д. 1Б

1. Индекс
2. Область
3. Город
4. Деревня (или ПГТ)
4. Улица или территория например(сквер Некрасова)
5. Номер дома

Моя задача выделить из структуры запросом Название улицы и сделать выборку типа:
cod_h
Street - (вычисляемое поле вида 'Анникова ул' без повторений улиц. Возможны пер переулки и пр.)
Улицу нужно выводить не зависимо где она находится в селе или в город.

Вот и подумываю, как лучше решать эту задачу...

@D1973 · 11.03.2024, 11:00

Сообщение от SeGun

отчего нельзя запрос Q1 использовать

Да почему нельзя - можно. Вот только у меня компоненты TFDQuery - они бесплатные, я не плачу дополнительных денег за размещение на форме нескольких компонентов, поэтому я могу себе позволить один Query держать для вывода одного запроса, другой - для другого, для выполнения операций вставки и изменения у меня будут третий и четвертый компоненты. И все это богатство, заметьте, совершенно бесплатно. Так зачем я буду себя ограничивать?

@krapotkin · 11.03.2024, 11:04

экономные авторы могут один компонент вообще на несколько программ делить))

@SeGun · 11.03.2024, 11:16 **[ТС]**

Слегка модифицировал:

Delphi
1
2
3
4
5
6
7
procedure TUMain.ListBox1Click(Sender: TObject);
begin
 DM1.QHouses.Close;
 DM1.QHouses.SQL.Text := ('SELECT * FROM houses WHERE haddr LIKE :param1');
 DM1.QHouses.ParamByName('param1').AsString := '%%'+L.ValueFromIndex[ListBox1.ItemIndex]+'%%';
 DM1.QHouses.Open();
end;

Первый смайлик не мой.

Добавлено через 1 минуту

Сообщение от krapotkin

экономные авторы могут один компонент вообще на несколько программ делить))

При выборке - легко

@D1973 · 11.03.2024, 11:23

Сообщение от SeGun

Первый смайлик не мой

Тэги ЯП используйте для выделения кода - не будет таких "первых смайликов"

@SeGun · 11.03.2024, 11:26 **[ТС]**

Сообщение от D1973

Тэги ЯП программирования используйте для выделения кода - не будет таких "первых смайликов"

Таки да.

@SeGun · 12.03.2024, 10:15 **[ТС]**

Сообщение от D1973

Так зачем я буду себя ограничивать?

Сообщение от D1973

у меня компоненты TFDQuery - они бесплатные, я не плачу дополнительных денег за размещение на форме нескольких компонентов, поэтому я могу себе позволить один Query держать для вывода одного запроса, другой - для другого, для выполнения операций вставки и изменения у меня будут третий и четвертый компоненты. И все это богатство, заметьте, совершенно бесплатно. Так зачем я буду себя ограничивать?

Да, вроде бы и ограничивать не нужно.
Хотя если задуматься, то трансакции одни читают, другие пишут и не разумнее ли использовать два компонента один для выборки другой для записи на одну таблицу.
А пространство DataModule - оно ведь не безграничное хотя и бесплатное.
Или я не прав?

@D1973 · 12.03.2024, 10:27

Сообщение от SeGun

два компонента один для выборки другой для записи на одну таблицу

еще про операцию изменения данных забыли.

Ну и, кроме того, выбираться данные могут из нескольких таблиц, с большущей секцией SELECT, громоздкими JOIN-ами. Так неужели не проще забить такой запрос в отдельный компонент, указав место для необходимых параметров, которые легко вставить на нужные места когда придет их время. Или, таки, громоздить эту красоту в коде, рискуя напутать с расстановкой кавычек и скобок?

Сообщение от SeGun

А пространство DataModule - оно ведь не безграничное

м-м-м-м...

Это Вы о чем сейчас, о каком пространстве? DataModule - не более чем невизуальный контейнер для размещения компонентов для работы с БД, невидимая форма... И пространство его ограничено разве что объемом оперативной памяти... Или Вы что-то иное в виду имели?

@SeGun · 12.03.2024, 10:55 **[ТС]**

Сообщение от D1973

DataModule - не более чем невизуальный контейнер для размещения компонентов для работы с БД, невидимая форма... И пространство его ограничено разве что объемом оперативной памяти... Или Вы что-то иное в виду имели?

Ну как сказать не видимая форма...

@D1973 · 12.03.2024, 10:59

Сообщение от SeGun

Ну как сказать не видимая форма

А что не так? В режиме run-time Вы ее не видите, она нужна только во время разработки. Я, вот честное слово, никак не пойму проблему...

@SeGun · 12.03.2024, 11:18 **[ТС]**

Сообщение от D1973

А что не так? В режиме run-time Вы ее не видите, она нужна только во время разработки. Я, вот честное слово, никак не пойму проблему...

Да нет проблемы, я просто спросил Ваше мнение по этому вопросу.

Новые блоги и статьи Все статьи Все блоги /
Из невошедшего на форум (диалог с ИИ-гугла) zorxor 29.07.2026 А вот, что интересно, сказал мне ИИ-гугла: Этот текст — эмоциональный пост пользователя под ником zorxor на интернет-форуме (вероятно, посвященном мистике, непознанному или альтернативной науке). . . .	Был праздник вчера, а я и не знал. kumehtar 28.07.2026 27. 07. 2026г. Intel Core 2 Duo исполнилось 20 лет Новости компьютерного мира и их обсуждение (4) Салют, шампанское, овации! :drink:	Нейтральные знания, чистый код - бла-бла-бла-бла, на самом деле кликбейт и самореклама, плагиат, и вот почему Hrethgir 27.07.2026 То-есть отклонение такой публикации говорит само за себя, и пусть только возьмут на вооружение после отклонения публикации - это будет чистейшим актом плагиата. Отклонял Хабр. Дословно, отклонённая. . .	тв 16 бой ии anaschu 27.07.2026 Великий Перелом ИИ: Как уравнения ОДУ Radau дожали цензурные фильтры Алисы Фиксируем в мемофонде Теории Всего беспрецедентный факт в истории ИИ-зондирования. В затяжном многораундовом. . .
мв 15. непроверенное, возможно, глюк anaschu 27.07.2026 НАУЧНО-АНАЛИТИЧЕСКИЙ ОТЧЕТ. РАЗДЕЛ 1. 1: «НАУКА» (РАСШИРЕННАЯ СТЕХИОМЕТРИЧЕСКАЯ И ГЕНЕТИЧЕСКАЯ ВЕРСИЯ)Тема: Теоретическое обоснование инвариантности 19-мерного тензорного ядра непрерывных ОДУ и. . .	Очистка реквизитов и табличных частей документа при копировании (вариант 2) Maks 26.07.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРаботу", разработанного в КА2. Задача: Заменить алгоритм запрета копирования документов для сотрудников с ролью "Стажер",. . .	Доктрина интенционального знания - Доктрина для портала "Срез". Hrethgir 25.07.2026 Может найдётся кто захочет оценить доктрину. . . Написания правил участия для меня роскошь, требующая лимита времени, поэтому все сообщения не прошедшие модерацию будут видны только участникам портала,. . .	сукцессия 44. Решил подать на припринт в межународные сервисы препринтов. Но нужно одобрение от ученых anaschu 25.07.2026 Английский вариант. Пока кто то не одобрит мою личность, мне не получиться это опубликовать на препринте. Но заявку на публикацию статьи я сегодня подам.

@SeGun 130 / 109 / 22 Регистрация: 23.05.2015 Сообщений: 724

	RAD XE3+ Выделить улицу из адресной структуры 06.03.2024, 11:16. Показов 2031. Ответов 29 Метки firebird 2.5, rad studio 11 (Все метки) Добрый день народ. Имеется адресная структура в виде строки в базе данных Таблица HOUSES в ней поля cod_h - Индекс (первичный ключ) haddr - текстовое поле содержащее адрес следующей структуры: Пример: 424019, Респ Марий Эл, г Йошкар-Ола, ул Анникова, д. 7 Запятые делят структуру на блоки: 1. Индекс 2. Республика 3. Город 4. Улица или территория например(сквер Некрасова) 5. Номер дома Возможен вариант: Пример 142050, обл Московская, г Домодедово, д Артемьево, ул Кедровая, д. 1Б 1. Индекс 2. Область 3. Город 4. Деревня (или ПГТ) 4. Улица или территория например(сквер Некрасова) 5. Номер дома Моя задача выделить из структуры запросом Название улицы и сделать выборку типа: cod_h Street - (вычисляемое поле вида 'Анникова ул' без повторений улиц. Возможны пер переулки и пр.) Улицу нужно выводить не зависимо где она находится в селе или в город. Вот и подумываю, как лучше решать эту задачу... 0

@krapotkin 6854 / 4680 / 1465 Регистрация: 14.04.2014 Сообщений: 20,681 Записей в блоге: 21
	11.03.2024, 11:04
	экономные авторы могут один компонент вообще на несколько программ делить)) 0