Стандартное окно компонента TFindDialog
Рисунок 18.43 . Стандартное окно компонента TFindDialog
Его значения имеют следующий смысл:
| frDown frFindNext | Устанавливает поиск вперед по тексту |
| frHideMatchCase | Сообщает программе, что пользователь нажал кнопку Найти далее Убирает выбор в переключателе с учетом регистра |
| frHideWholeWord | Убирает выбор в переключателе только слово целиком |
| frHideUpDown | Прячет кнопки выбора направления поиска |
| frMatchCase | Устанавливает выбор в переключателе с учетом регистра |
| frDisableMatchCase | Запрещает выбор С учетом регистра |
| frDisableUpDown | Запрещает выбор направления поиска |
| frDisableWholeWord | Запрещает выбор только слово целиком |
| frReplace | Используется в компоненте TReplacteDialog и указывает на необходимость замены текущего выбора |
| frReplaceAll | Используется в компоненте TreplaceDialog и указывает на необходимость замены всех вхождений образца поиска |
| frWholeWord | Устанавливает выбор в переключателе Только слово целиком. |
| frShowHelp | Включает в окно кнопку Help |
Спецификой диалога является реализуемая им возможность просмотра найденного фрагмента и при необходимости продолжение поиска. С этой целью для компонента определено событие OnFind:
TNotifyEvent, которое возникает всякий раз, когда пользователь нажимает кнопку найти далее. Обработчик события должен найти образец в тексте и показать его пользователю. Пусть, например, компонент Memol содержит отыскиваемый фрагмент и поиск идет с учетом регистра. Тогда обработчик может иметь такой вид:
procedure TFor.gif" >
Содержание
Вперед