Поиск в таблице из TEdit c разделителями ";"

@mate26 · Регистрация: 18.02.2013

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

Здравствуйте.

Не обращаясь на форум накодил 2000 строк кода и столкнулся с проблемой, с которой точно самоучке не справиться.

Имеется TAdvStringGrid и TEdit:

C++
1
2
3
4
5
6
7
for (int Row_Count=1;Row_Count<Form1->AdvStringGrid->RowCount;Row_Count++)
    {
     if (AnsiPos(Edit1->Text,AdvStringGrid->Cells[2][Row_Count])!=0)
       {
       _кусок_кода_
       }
     }

Хочется сделать так, чтобы в Edit1 можно было вставлять множество строк поиска, разделяя их ";".

@proleha · 18.02.2013, 11:28

Кстати с дуру можно написать и 10000 строк, два дня назад только сотрудник на стажеровке парсинг лога делал, на 700 строк кода, потом дал ему задание переделать используя циклы 100, потом использовать процедуры БД, 20 строк.
Если тебя парсинг строки интерисует то вот

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
AnsiString t="раз;два;три";
AnsiString t2="";
int y;
while (t.Length()>0)
{
y=t.Pos(";");
if (y!=0)
{
t2=t.SubString(0, y-1);
ShowMessage(t2);
t= t.SubString((t2).Length()+2, t.Length()-t2.Length());
}
else
{
 ShowMessage(t);
 t="";
}
}

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

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

Здравствуйте.

Не обращаясь на форум накодил 2000 строк кода и столкнулся с проблемой, с которой точно самоучке не справиться.

Имеется TAdvStringGrid и TEdit:

Хочется сделать так, чтобы в Edit1 можно было вставлять множество строк поиска, разделяя их ";".

А прокоментируй код, как я понял есть некая таблица, заполненная из чего то, и там пытаешь по гриду сделать поиск...
Если заполнение из базы данных, то алгоритм в корне неверный

@mate26 · 18.02.2013, 15:16 **[ТС]**

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

А прокоментируй код, как я понял есть некая таблица, заполненная из чего то, и там пытаешь по гриду сделать поиск...
Если заполнение из базы данных, то алгоритм в корне неверный

Там таблица (достается из екселя, сам екселевский файл уничтожается)
время |название|длительность|
нужно выделить строку содержащую подстроку в названии, условие поиска может быть как одно, так и множество, а создавать ещё один edit (или ещё множество), как сами понимаете не вариант.

@proleha · 18.02.2013, 15:26

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

Там таблица (достается из екселя, сам екселевский файл уничтожается)
время |название|длительность|
нужно выделить строку содержащую подстроку в названии, условие поиска может быть как одно, так и множество, а создавать ещё один edit (или ещё множество), как сами понимаете не вариант.

Так где именно поиск проиходит, в файле эксель или в таблице былдара.
Я так понимаю, в таблице которую загрузили в одном поле будет несколько полей но разделённые символами, и по этим полям надо осуществлять поиск.
Если я правильно понял, а у меня два варианта как я понял:
1. понимаешь, хоть что это за обход будет, тоесть обходим не просто всю таблицу а ещё распарсиваем строку и сравниваем.
А разбор строки на подстроки я выше привёл. Тоесть в обход общего массива вставляешь разбор строки.
2. у тебя поле для ввода данных поиска, через точку запятую к примеру, то есть сначала создаёшь массив распарсив edit, используя код выше, и делаем поиск сравнивая необходимые поля.

В любом случае всё некрасиво.

@volvo · 18.02.2013, 15:29

mate26,

C++
1
2
3
4
5
6
7
8
9
10
11
    String s = L"раз раз раз;два;три";
    std::auto_ptr<TStringList> MyList(new TStringList()); // или просто TStringList *MyList = new TStringList(); + delete
    MyList->Delimiter = ';';
    MyList->DelimitedText =
       String("\"") + StringReplace(s, ";", "\";\"", TReplaceFlags() << rfReplaceAll) + "\""; // Оборачиваем строки кавычками
 
    for(int i = 0; i < MyList->Count; i++)
    {
        // Тут работаешь со строками по отдельности, через MyList->Strings[i]
        // Как? Тебе видней, что надо делать со строками...
    }

Если не сделать "оборачивания" в кавычки - о строка разобьется не только по символу, занесенному в Delimiter, но и по пробелу...

@mate26 · 19.02.2013, 07:12 **[ТС]**

UI, Во! То что надо! Спасибо огромное!

Новые блоги и статьи Все статьи Все блоги /
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .	Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Данные берутся из. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git

@mate26 0 / 0 / 0 Регистрация: 18.02.2013 Сообщений: 4
	19.02.2013, 07:12 [ТС]
	UI, Во! То что надо! Спасибо огромное! 0

Поиск в таблице из TEdit c разделителями ";"

Решение