Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB34OnFind.shtml

Глава 34. TCommonDialog.OnFind

Событие OnFind

Затрагиваемые объекты TFindDialog, TReplaceDialog
Назначение Событие OnFind происходит в момент нажатия кнопки Find_Next в диалоговом окне Find или Replace.
Объявление property OnFind: TNotifyEvent;
Пример синтаксиса
type TForm1 = class(TForm)
     FindDialog1: TFindDialog;
     procedure FormCreate(Sender: TObject);
//   . . . 
public
     procedure TextFound(Sender: TObject);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
   FindDialog1.OnFind := TextFound;
end;
procedure TForm1.TextFound(Sender: TObject);
begin
// Ввести код для  обработки  события OnFind
end;
Описание Обработайте событие OnFind, когда будет нажата кнопка Find_Next.

[Свойство Collate] [Свойство Color] [Свойство Copies] [Свойство Ctl3D] [Свойство CustomColors] [Свойство DefaultExt] [Свойство Device] [Метод Execute] [Свойство FileName] [Свойство Files] [Свойство Filter] [Свойство FilterIndex] [Свойство FindText] [Свойство Font] [Свойство FromPage] [Свойство Handle] [Свойство HelpContext] [Свойство InitialDir] [Свойство Left] [Свойство MaxFontSize] [Свойство MaxPage] [Свойство MinFontSize] [Свойство MinPage] [Событие OnApply] [Событие OnFind] [Событие OnReplace] [Свойство Options] [Свойство Position] [Свойство PrintRange] [Свойство PrintToFile] [Свойство ReplaceText] [Свойство Title] [Свойство ToPage]


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB34OnFind.shtml