Поиск в Grid
В новостях от 15.09.2000 прочитал о возможностях поиска в Grid и решил поэкспериментировать. Класс работает великолепно, но вот ищет только с начала строки. Да и выводить искомое значение в Header наверное не всегда удобно. На основании своих прежних наработок, данных почерпнутых из статей журнала FoxTalk (русское издание) и используя, информацию, полученную при анализе работы класса Ingrid, я подготовил класс, который возможно кому-то облегчит жизнь.
Описание класса:
Класс содержит два объекта: текстовый: “Intext” и контейнер “Ins” и создан средствами VFP 5.0. Назначение производить поиск “Locate”в полях имеющих типы “Numeric”, “Character” и “Date” c возможностью уточнения и продолжения.
Для нормальной работы класса необходимо выполнить следующие действия.
1. На форме создайте Property ”St”.
2. Поместите контейнер “Ins” на форму имеющую объект “Grid”.(В случае, если “Grid” расположен на закладке “Page Frame”, поместите контейнер “Ins” на туже страницу, что и “Grid”). Высоту контейнера необходимо установить в ручную, ширину класс установит равной ширине колонки в “Grid”.
3. Удалите из колонок объекты “Text1”
4. Добавьте объект “Intext” в колонки “Grid”.
В случае, если Вы используете методы удаляемых текстовых объектов, скопируйте эти методы в методы объекта “Intext”.
При попытке ввода символов в активной ячейке “Grid”, класс форматирует контейнер “Ins” под активную колонку, делает его видимым и начинает поиск.Поиск по первому символу не производится. По нажатию комбинации “Ctrl+Enter”, класс выполняет “CONTINUE” на последнее введенное значение поиска. Работа класса была проверена на Pentium100/32mb справочник, скопированный в курсор, содержал 5500 записей. Нареканий у пользователей не было.
С уважением Vadim Hairetdinov.
Автор публикации
Вложенные файлы
# |
Название |
Тип файла |
Размер |
|---|---|---|---|
| 1 | search | .zip | 7,49 КБ |