Организация поиска(вывода сообщения об ошибке)

@ruslan_smirnov · Регистрация: 01.03.2011

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

При нажатии на кнопку поиска определенный элемент выделяется в листБоксе, это прекрасно работает.Но не работает сообщение об ошибке, на каждый элемент, который не удовл.условиям поиска выдается сообщение.Вот код:

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
void __fastcall TForm8::Button1Click(TObject *Sender)
{
int k;
for (int i = 0; i < ListBox2->Items->Count; i++){
        if (Edit13->Text==ListBox2->Items->Strings[i]) {
            k=i;
ADOQuery1->Active=false;
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("Select imya, fam, otch  FROM stud WHERE fio='"+Edit13->Text+"';");
ADOQuery1->Open();
Edit1->Text=ADOQuery1->FieldByName("fam")->AsString;
Edit2->Text=ADOQuery1->FieldByName("imya")->AsString;
Edit3->Text=ADOQuery1->FieldByName("otch")->AsString;
 
Form8->ListBox1->ItemIndex=k;
}
 
else{
if(Application->MessageBox("Студент не найден!",
                "Ошибка!", MB_OK+MB_ICONERROR) == IDOK){
                Edit13->SetFocus();
 
  }
  }
}
}

@Sasha · 17.05.2011, 21:50

Этот студент в твоём списке вообще есть?

@ruslan_smirnov · 17.05.2011, 21:59 **[ТС]**

да, он его выводит, но перед ним стоит студент которого нет и выводится сообщение что не найден!

@Sasha · 17.05.2011, 22:10

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

но перед ним стоит студент которого нет и выводится сообщение что не найден!

Ну так он и будет выводить, потому что цикл стоит.
К примеру если у тебя в списке 10 студентов с разными фамилиями и один из них совпадает, то будет так
9 раз выведет сообщение студент не найден
1 раз сработает твой запрос

@ruslan_smirnov · 17.05.2011, 22:22 **[ТС]**

с этой проблемой я сюда и обратился

@Sasha · 17.05.2011, 23:24

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
27
28
29
30
void __fastcall TForm8::Button1Click(TObject *Sender)
{
bool fgh = false;
int k;
for (int i = 0; i < ListBox2->Items->Count; i++){
                if (Edit13->Text==ListBox2->Items->Strings[i]) {
                        k=i;
ADOQuery1->Active=false;
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("Select imya, fam, otch  FROM stud WHERE fio='"+Edit13->Text+"';");
ADOQuery1->Open();
Edit1->Text=ADOQuery1->FieldByName("fam")->AsString;
Edit2->Text=ADOQuery1->FieldByName("imya")->AsString;
Edit3->Text=ADOQuery1->FieldByName("otch")->AsString;
 
Form8->ListBox1->ItemIndex=k;
 
fgh = true;
break;
}
} 
 
  if (!fgh))
 {
    if(Application->MessageBox("Студент не найден!","Ошибка!", MB_OK+MB_ICONERROR) == IDOK)
  {
    Edit13->SetFocus();
  }
 }
}

@ruslan_smirnov · 17.05.2011, 23:29 **[ТС]**

та же картина!(
жесть просто)

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	17.05.2011, 21:50
	Этот студент в твоём списке вообще есть? 0

@ruslan_smirnov 1 / 1 / 1 Регистрация: 01.03.2011 Сообщений: 89
	17.05.2011, 21:59 [ТС]
	да, он его выводит, но перед ним стоит студент которого нет и выводится сообщение что не найден! 0

@ruslan_smirnov 1 / 1 / 1 Регистрация: 01.03.2011 Сообщений: 89
	17.05.2011, 22:22 [ТС]
	с этой проблемой я сюда и обратился 0

@ruslan_smirnov 1 / 1 / 1 Регистрация: 01.03.2011 Сообщений: 89
	17.05.2011, 23:29 [ТС]
	та же картина!( жесть просто) 0

Опции темы