Справочник по компонентам Delphi. Часть 2 - Компонент TReplaceDialog
ОГЛАВЛЕНИЕ
Страница 44 из 61
Компонент TReplaceDialog
TObject -> TPersistent -> TComponent -> TCominonDialog -> TFindDialog -> -> TReplaceDialog
Модуль DIALOGS
Страница Палитры компонентов Dialogs
Этот диалог отличается от предыдущего тем, что позволяет найденный текст заменить на другой, заданный свойством:
(Рb) property ReplaceText: string;
При нажатии кнопок Replace или Replace All в диалоге возникает событие
(Pb) property OnReplace: TNotifyEvent;
При этом в множество Options добавляется одна из новых опций — fi-Replace или frReplaceAll. В обработчике этого события нужно предусмотреть поиск и замену текста.
Использование стандартньк диалоговых окон иллюстрирует пример DEMOEDIT. Это простой однооконный редактор текста, который, однако, использует все семь компонентов-диалогов. Для поиска и замены в нем задействован модуль SEARCH, приведенный в одном из примеров фирмы Borland. Модуль можно найти в каталоге DELPHI\DEMOS\TEXTDEMO.