Форум на Исходниках.RU

Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857295 Thu, 06 Jan 2022 15:50:55 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857295 deoxpa Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857276 Thu, 06 Jan 2022 08:07:54 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857276

ListBox2->Clear();

int i = 0;

while( i<ListBox1->Items->Count )

{

int compre = ListBox1->Items->Strings[i].LowerCase().Pos( Edit1->Text.LowerCase().Trim() );

if( compre ) ListBox2->Items->Add( ListBox1->Items->Strings[i] );

i++;

}

]]> Славян Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857271 Wed, 05 Jan 2022 23:56:02 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3857271
У меня получилось только привести всё к нижнему регистру. Но некоторые люди и грамотно пишут и будут писать первую букву большую. Тогда фильтрация уже не срабатывает.

ListBox2->Clear();

int i=0;

bool compre = false;

while (i<ListBox1->Items->Count)

{

compre = ListBox1->Items->Strings[i].LowerCase().Pos(Edit1->Text.Trim());

if (compre)

{

ListBox2->Items->Add(ListBox1->Items->Strings[i]);

}

compre = false;

i++;

}

]]> deoxpa Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533115 Wed, 08 Oct 2014 14:16:34 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533115 Цитата Relaxander @ 08.10.14, 12:42

а слона-то никто и не заметил. AnsiPos возвращает > 0, если находит

По памяти писал, спутал наверное с -1.]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533053 Wed, 08 Oct 2014 13:10:42 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533053 Цитата Relaxander @ 08.10.14, 13:02

а почему compre - bool и зачем compre = false?

Справедливо

if (ListBox1->Items->Strings[i].Pos(Edit1->Text.Trim()))

]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533047 Wed, 08 Oct 2014 13:02:32 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533047 Цитата sten_11 @ 08.10.14, 12:50

более оптимальные коды

а почему compre - bool и зачем compre = false?]]> Relaxander Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533036 Wed, 08 Oct 2014 12:50:00 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533036 Цитата shm @ 08.10.14, 12:48

вроде автора перебор не устраивал, а теперь вроде поменял мнение.

А что делать ))

Добавлено 08.10.14, 12:52
Итого получилось

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

ListBox2->Clear();

int i=0;

bool compre = false;

while (i<ListBox1->Items->Count)

{

compre = ListBox1->Items->Strings[i].Pos(Edit1->Text.Trim());

if (compre)

{

ListBox2->Items->Add(ListBox1->Items->Strings[i]);

}

compre = false;

i++;

}

Принимаю более оптимальные коды.

Добавлено 08.10.14, 12:58
В догонку. Как в Мемо вывести строку из ListBox на которой активный курсор. Можно по двойному клику на ListBox .]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533035 Wed, 08 Oct 2014 12:49:36 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533035 Цитата sten_11 @ 08.10.14, 12:21

Дело в том, что я не хочу в рамках этой задачи связываться с БД

на билдере это нск. строк кода.]]> shm Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533034 Wed, 08 Oct 2014 12:48:55 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533034 sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533031 Wed, 08 Oct 2014 12:48:13 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533031 Цитата Relaxander @ 08.10.14, 12:42

а слона-то никто и не заметил

да ни кто и не смотрел... вроде автора перебор не устраивал, а теперь вроде поменял мнение.]]> shm Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533025 Wed, 08 Oct 2014 12:42:33 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533025 Relaxander Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533020 Wed, 08 Oct 2014 12:36:30 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533020 Цитата Bas @ 07.10.14, 14:10

Создаем второй ListBox2

Это идея. Попробовал так, но не вышло.

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

ListBox2->Clear();

int i=0;

while (i<ListBox1->Items->Count)

{

if (ListBox1->Items->Strings[i].AnsiPos( Edit1->Text.Trim())>=0)

ListBox2->Items->Add(ListBox1->Items->Strings[i]);

i++;

}

Создается второй список полностью аналогичный первому.]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533014 Wed, 08 Oct 2014 12:30:26 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533014 ListBox2-результат выборки, видимый

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

int i=0;

ListBox2->Items->Clear();

while (i<ListBox1->Items->Count)

{

if (ListBox1->Items->Strings.AnsiPos( Edit1->Text.Trim())>=0) ListBox2->Items->Add(ListBox1->Items->Strings[i])

i++;

}

]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533008 Wed, 08 Oct 2014 12:21:28 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3533008 Цитата Dem_max @ 08.10.14, 03:05

Я так понимаю это вообще команда к SQL, причем тут ListBox ????

Дело в том, что я не хочу в рамках этой задачи связываться с БД. Просто на БД я бы использовал скрипт, а тут мне надо реализовать его аналог.]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532720 Wed, 08 Oct 2014 05:16:45 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532720

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

for(int i = 0; i < ListBox1->Items->Count; i++)

{

if (ListBox1->Items->Strings.AnsiPos(Edit1->Text.Trim())>=0)

{

ListBox1->ItemIndex = i;

break;

}

]]> Relaxander Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532698 Wed, 08 Oct 2014 03:05:05 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532698

select *from table where param like(%POISK %);

Я так понимаю это вообще команда к SQL, причем тут ListBox ????]]> Dem_max Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532633 Tue, 07 Oct 2014 15:28:49 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532633 Цитата sten_11 @ 07.10.14, 11:55

select *from table where param like(%POISK %);

:) Такое средствами ListBox не сделать. Однако, можно поробовать открыть твою таблицу через ADO, а там есть и SQL и DBListBox.]]> shm Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532585 Tue, 07 Oct 2014 14:10:19 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532585

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

int i=0;

ListBox *LName;

LFind= new ListBox();

while (i<ListBox1->Items->Count)

{

if (ListBox1->Items->Strings.AnsiPos( Edit1->Text.Trim())>=0) LFind->Items->Add(ListBox1->Items->Strings[i])

i++;

}

//select *from table where param like(%POISK %);

}

Что то типа? Не забудем удалить после new.]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532487 Tue, 07 Oct 2014 11:55:09 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532487 Цитата Bas @ 07.10.14, 11:34

А не проще при загрузке из xls фильтровать нужное?

Нет. Я хотел реализовать что-то типа:

void __fastcall TForm1::Edit1Change(TObject *Sender)

{

POISK = Edit1->Text.Trim();

...

select *from table where param like(%POISK %);

}

]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532474 Tue, 07 Oct 2014 11:34:44 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532474 Цитата

AnsiString::AnsiPos

AnsiString See also

Returns the index at which the specified substring begins.

int __fastcall AnsiPos(const AnsiString& subStr) const;

Description

Returns the index in the AnsiString at which the substring subStr begins, where 1 is the first character in the string, 2 is the second character, and so on. If the substring is not contained in the AnsiString, Pos returns 0. This member function is the same as Pos but supports multibyte character strings.

Note: See ByteType for more information about multibyte characters.

Добавлено 07.10.14, 11:36

Цитата sten_11 @ 07.10.14, 11:32

Получается все строки перебрать надо?

Да. Но если загнать в Мемо то весь текст.
А не проще при загрузке из xls фильтровать нужное?]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532472 Tue, 07 Oct 2014 11:32:37 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532472 Цитата shm @ 07.10.14, 11:26

ListBox->Items->Strings

Получается все строки перебрать надо?]]> sten_11 Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532468 Tue, 07 Oct 2014 11:26:41 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532468 shm Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532463 Tue, 07 Oct 2014 11:21:23 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532463 Иначе - только тупым перебором и strstr() или подобной]]> Relaxander Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532457 Tue, 07 Oct 2014 11:15:12 +0000 ListBox https://forum.sources.ru/index.php?showtopic=395248&view=findpost&p=3532457 sten_11 Borland C++ Builder/Turbo C++ Explorer