Цикл и вывод необходимых элементов

@Hrustik · Регистрация: 29.05.2013

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

Всем привет. Есть Таблица Стоянка, в ней имеется ( Код, Въезд, Выезд, Владелец машины, № места).
Я пока что сделал так: при выборе места в списке ComboBox1 можно выбрать только те места которые еще раннее не были записаны в эту таблицу.
Код:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
// все возможные места 
ComboBox2->Items->Add(1);
ComboBox2->Items->Add(2);
ComboBox2->Items->Add(3);
ComboBox2->Items->Add(4);
ComboBox2->Items->Add(5);
ComboBox2->Items->Add(6);
ComboBox2->Items->Add(7);
ComboBox2->Items->Add(8);
 
//вывод в комбобокс всех уже когда либо занятых мест 
ADOTable1->Active = true;
        ADOTable1->First();
        while (!ADOTable1->Eof){
                ComboBox3->Items->Add(ADOTable1->FieldByName("№ места")->AsString);
                ADOTable1->Next();
        }
        ADOTable1->Active = false;
        ComboBox3->ItemIndex = 0;
 
//Вносятся в комбобокс все НЕ занятые места
for (int i = 0; i < ComboBox2->Items->Count; i++){
ComboBox2->Items->Strings[i];
if (ComboBox3->Items->IndexOf(ComboBox2->Items->Strings[i]) <0 ){
ComboBox1->Items->Add(ComboBox2->Items->Strings[i]);
}}

Это хорошо, но фишка в том что надо заносить в комбобокс все те свободные места которые даже были занятые ранее и ранее были уже освобождены.
Код:

C++
1
2
DateTimePicker1->DateTime = Now();
if (DateTimePicker1->DateTime > DateTimePicker2->DateTime){...}    //DateTimePicker2 - это дата выезда

Нужно как то прогнать через цикл все уже записанные в таблице места и приравнять даты выезда всех этих мест (По моему это делается через функцию Locate) к сегодняшней дате

C++
1
DateTimePicker1->DateTime = Now();

и если ДатаВыезда<СегодняшнейДаты то добавить №места которое было внесено вместе с этой датой выезда в ComboBox1, правда я не знаю что будет если одно и то самое место занималось несколько раз...
Помогите плиз ребят, понятия не имею как реализовать все это...

@D1973 · 12.04.2015, 14:10

Лично мне такая БД видится из 2-х таблиц, связанные, как на рисунке
Дальше все просто: заехала машина, заняла место, данные внесены - обновляется список мест, которые свободны.
Выехала машина, место освободилось, данные опять изменились - снова обновляем список мест.

@Hrustik · 12.04.2015, 21:55 **[ТС]**

D1973,
Это я пробную просто создал чтобы не морочить голову. Вообще у меня не стоянка а СТО 9 таблиц,
просто сейчас работаю над стоянкой в моей бд. Связана она другим полем. Нужно сделать именно так как выше написал, а там я уже по примеру сделаю под свою БД.

Добавлено через 2 часа 41 минуту
D1973,
Вот что то получилось... Но цикл проверят только первый встречный элемент и на нем штопориться.
Как я и говорил вывел все даты выезда в новый комбо а потом через Locate нашел к ним места...

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
DateTimePicker1->DateTime = Now();
 
ADOTable1->Active = true;
for (int i = 0; i < ComboBox3->Items->Count; i++){
ComboBox3->Items->Strings[i];
if (DateTimePicker1->DateTime > ComboBox4->Items->Strings[i]){
Label1->Caption = "OK!";
if(ADOTable1->Locate("Дата Выезда",ComboBox4->Text,TLocateOptions())){
ComboBox1->Items->Add(ADOTable1->FieldByName("Место")->Value);}
}}
ADOTable1->Active = false;
 
for (int i = 0; i < ComboBox2->Items->Count; i++){
ComboBox2->Items->Strings[i];
if (ComboBox3->Items->IndexOf(ComboBox2->Items->Strings[i]) <0 ){
ComboBox1->Items->Add(ComboBox2->Items->Strings[i]);
}}

Добавлено через 21 минуту
D1973,

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
DateTimePicker1->DateTime = Now();
 
ADOTable1->Active = true;
//Ищем те места которые уже должны быть свободны(сверяя текущую дату и даты выездов)
for (int i = 0; i < ComboBox3->Items->Count; i++){     
ComboBox3->Items->Strings[i];
if (DateTimePicker1->DateTime > ComboBox4->Items->Strings[i]){
Label1->Caption = "OK!";
// Ищем из полного списка дат выездов места стоянки и добавляем их в комбо 1
if(ADOTable1->Locate("Дата Выезда",ComboBox4->Text,TLocateOptions())){
ComboBox1->Items->Add(ADOTable1->FieldByName("Место")->Value);}
}}
ADOTable1->Active = false;
 
for (int i = 0; i < ComboBox2->Items->Count; i++){
ComboBox2->Items->Strings[i];
if (ComboBox3->Items->IndexOf(ComboBox2->Items->Strings[i]) <0 ){
ComboBox1->Items->Add(ComboBox2->Items->Strings[i]);
}}

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

Добавлено через 4 часа 29 минут
А вот и то что нужно было заменить

C++
1
if(ADOTable1->Locate("ДатаВыезда",ComboBox4->Items->Strings[i],TLocateOptions())){

Комментарий модератора

Пункт 4.14 и 5.2 Правил: за такие слова вам вообще никто помогать не будет.

@Sasha · 12.04.2015, 22:24

Не по теме:

Hrustik, если Вам никто не ответил это не значит, что надо оскорблять

Новые блоги и статьи Все статьи Все блоги /
влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .

@D1973 Модератор 9911 / 6448 / 2455 Регистрация: 21.01.2014 Сообщений: 27,374 Записей в блоге: 3
	12.04.2015, 14:10
	Лично мне такая БД видится из 2-х таблиц, связанные, как на рисунке Дальше все просто: заехала машина, заняла место, данные внесены - обновляется список мест, которые свободны. Выехала машина, место освободилось, данные опять изменились - снова обновляем список мест. Миниатюры 0

@Sasha
	12.04.2015, 22:24
	Не по теме: Hrustik, если Вам никто не ответил это не значит, что надо оскорблять 0