void __fastcall TForm1::Edit1Change(TObject *Sender)
{
TLocateOptions SOptions;
DataModule2->ClientDataSetKey->Locate("man", Edit1->Text, SOptions<<loCaseInsensitive<<loPartialKey);
}
ClientDataSet
Пользователь вводит в Edit1 буквы.
Программа анализирует их и в ClientDataSet курсор перемещается на строку, где есть совпадение из соотвествующей колонки с буквами из Edit1. По мере ввода курсор скользит и находит совпадения, останавливаясь на них. Если совпадений нет, то ничего не происходит.
Связь такая: ADOQuery – DataSetProvider – ClientDataSet – DataSource – грид.
Код: