ФИЛТРЫ или ПОИСК по БД, СРОЧНО
сделать так, чтоб поиск проводился во время ввода значения или хотя бы чтоб после нажатия ENTER,
не надо было давить на кнопку (Borland C++ 6)
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if ( Table1->Active == true )
{
Table1->Filtered = true;
Table1->Filter = Edit1->Text;
AnsiString((int)Table1->RecordCount);
}
Народ, помогите, поиск устраивает, но как сделать так, чтобы не надо было в Edit1 вводить "НАЗВАНИЕ ПОЛЯ = *" по которому ищу и ещё, подскажите, как
сделать так, чтоб поиск проводился во время ввода значения или хотя бы чтоб после нажатия ENTER,
не надо было давить на кнопку (Borland C++ 6)
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if ( Table1->Active == true )
{
Table1->Filtered = true;
Table1->Filter = Edit1->Text;
AnsiString((int)Table1->RecordCount);
}
Ну ежели поле все время одно и тоже, то чего же проще:
Table1->Filter = "название поля = "+Edit1->Text;
А в Еdit1 только значение фильтра.
Если нет, то я бы сделал еще ListBox с названиями полей и в нем выбирал имя поля а в Edit значение.
Ну ежели поле все время одно и тоже, то чего же проще:
Table1->Filter = "название поля = "+Edit1->Text;
А в Еdit1 только значение фильтра.
Если нет, то я бы сделал еще ListBox с названиями полей и в нем выбирал имя поля а в Edit значение.
А что по поводу ENTER?
А что по поводу ENTER?
Поиск нужно поместить в обработчик OnChange компонента Edit1. И не фильтр, а FindNearest().
Поиск нужно поместить в обработчик OnChange компонента Edit1. И не фильтр, а FindNearest().
На фиг FindNearest()? По-моему, при его использовании нужно еще и индексировать таблицу..
Лучше в OnChange записать что-нибудь типа
AnsiString Str2;
bool dz2;
Str2=Edit1->Text;
TLocateOptions SearchOptions;
SearchOptions<<loPartialKey<<loCaseInsensitive;
dz2=Form1->Table1->Locate("Pole",Str2,SearchOptions);
На фиг FindNearest()? По-моему, при его использовании нужно еще и индексировать таблицу..
Инкрементальный поиск в неотсортированной таблице? На фиг ?
Инкрементальный поиск в неотсортированной таблице? На фиг ?
С
Спасибо конечно но вот какая чтука
поиск должен быть интерактивный после каждого сивола, а при нажатии ENTER введеные символы добовлялись бы в другую таблицу, а Edit очищался и без всяких ошыбок типа нет символа и т.д.
Спасибо
P.S. только не ругайтесь, а обесните чайнику доходчего
С
Спасибо конечно но вот какая чтука
поиск должен быть интерактивный после каждого сивола, а при нажатии ENTER введеные символы добовлялись бы в другую таблицу, а Edit очищался и без всяких ошыбок типа нет символа и т.д.
Спасибо
P.S. только не ругайтесь, а обесните чайнику доходчего
У ComboBox есть еще событие OnExit (по потере фокуса)и OnDblClick (по двойному счелчку). Насколько я помню OnDblClick эмулирует еще и нажатие Enter.