IECombo

Вот пример комбобокса по аналогии с Internet Explorer

IECombo

Вот и я решил написать свой IECombo.
Хотя наверное надо было посмотреть решения с данного сайта.
Но раз написал так тому и быть. Довольно просто получилось.
Теперь как это все работает.
В папке PRG есть файл LibFormList.prg В нем описан класс
выпадающего листа.
В папке LIBS есть библиотека LibCombo в ней класс oComboBox
Ложите на форму и радуетесь работе.
В контейнере есть такие свойства:
Height_List - высота выпадающего листа.
RowSource - прописываете сюда название таблицы и поле.
Прим: RowSource="tMyTable.cMyPole"
RowSourceType - думаю с этим тоже все понятно
По умолчанию, если вы ничего не прописали в RowSourceType
принимается равным 2.
*********************************
Запустите форму Form1 и посмотрите как это все дело
работает.
Дополню что это дело работате в VFP8 в младших
версия не проверял.
В проекте есть еще библиотека LibsObjects это мои суперобъекты
для ресайзинга, на их основе написан и IECombo. Если кому-то не
по душе по суперобъекты, просто откройте библиотеку LibCombo как
таблицу и исправте ParentClass на базовые классы.
**********************
И еще выпадающий лист может менять свой размер.
**********************
Сделал выбор значения из листа по одному клику.
Сделал размеры листа статическими, так как при изменении
резмеров иногда вываливается критическая ошибка.
04.08.2005г.
Сделал полную аналогию со стандартным комбо.т.е поддержка Bound
Добавил событие Valid в контейнер.
К сожалению в грид так и не удалось встроить, но думаю это и не надо
Если вводить занчение и ничего не было найдено, то при потере фокуса объектом
поле закрасится в красный цвет, а если найдено и выбрано, то в синий.

Автор: Aries
0

Автор публикации

не в сети 21 год

Aries

0
Комментарии: 0Публикации: 7Регистрация: 24-12-2002
Вложенные файлы
#
Тип файла
Размер
Название
1 .zip 47,29 КБ 402iecombo
Оставить комментарий
Авторизация
*
*
Генерация пароля