Сравнение столбца и Edit'a

@Flamehaze · Регистрация: 09.12.2014

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

Добрый вечер. Пытаюсь тут сравнить значения столбца из таблицы со значением в Edit9 с помощью Strig List'а. Если сравнение неверно(т.е значение эдита не совпадает с каким-либо значением из столбца,который находится в стринглисте),то должно что-то выполнятся,иначе нет.
Набросал код,но к сожалению,он не работает. Подскажите,пожалуйста,что не так?

C++
1
2
3
4
5
6
ADOQuery1->SQL->Text = "select Default_name from Default_program;";
ADOQuery1->Open();
TStringList *List = new TStringList;
List->Add(ADOQuery1->FieldByName("Default_name")->AsAnsiString);
String n = Edit9->Text;
if (List->IndexOf(n) == -1)

@Sasha · 28.03.2016, 23:51

А почему нельзя сразу в базе сравнивать со значением Edit1?

@Flamehaze · 29.03.2016, 22:14 **[ТС]**

Каким образом?

Добавлено через 5 часов 11 минут
Вообще можно сделать проще.Загрузить весь столбец в мемо и сравнить с эдитом. Вот только у меня и тут проблемы. У меня если значения совпало,то открывается вторая форма,если же не совпало,то ничего не происходит. А необходимо с точностью,да наоборот. Замена знака == на != почему-то не помогает.Что не так?

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button1Click(TObject *Sender)
{
for(int i = 0; i<Memo1->Lines->Count; i++)
   {if(Edit1->Text == Memo1->Lines->Strings[i])
 
       {    Form2->Show(); }
       }
}

@Sasha · 29.03.2016, 22:29

Пробуй

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Text = "select Default_name from Default_program";
ADOQuery1->Open();
ADOQuery1->First();
while(!ADOQuery1->Eof)
{
 if(Edit9->Text == ADOQuery1->FieldByName("Default_name")->AsString)
 {
  Form2->ShowModal();
  break;
 }
 ADOQuery1->Next();
}
ADOQuery1->First();

@Flamehaze · 29.03.2016, 22:41 **[ТС]**

Проблема решена.
Сделал так

C++
1
2
3
4
5
6
7
8
9
10
11
ADOQuery1->SQL->Text = "select Default_name from Default_program;";
ADOQuery1->Open();
ADOQuery1->First();
TStringList *List = new TStringList;
 
    while (!ADOQuery1->Eof) {
        List->Add(ADOQuery1->FieldByName("Default_name")->AsAnsiString);
        Form1->ADOQuery1->Next();
        }
String s = Edit8->Text;
if (List->IndexOf(s) == -1)

Добавлено через 1 минуту
Ох,спасибо за помощь.Так бы сэкономил полчаса. Зато разобрался

Новые блоги и статьи Все статьи Все блоги /
Установка 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 ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	28.03.2016, 23:51
	А почему нельзя сразу в базе сравнивать со значением Edit1? 0