Revision 1 of 2, by Trev on 3-1-2020. The page as it is now.

TReplaceDialog

TReplaceDialog is a component that aids in search and replace textinformation. It can be found on the Dialogs tab of the Component Palette.

]]

Usage

An example to use a TReplaceDialog with a TSynEdit. The OnReplace will be executed when the 'Replace' button within the dialog is pressed.

pascal

procedure TMyForm.Button1Click(Sender: TObject);
begin
  ReplaceDialog1.Execute();
end;

procedure TMyForm.ReplaceDialog1Replace(Sender: TObject);
var
  k: integer;
begin
  with Sender as TReplaceDialog do begin
    opt := []; 
    if frReplace in Options then
      opt := [ssoReplace]; 
    if frReplaceAll in Options then
      opt := [ssoReplaceAll]; 
    k := TSynEdit1.SearchReplaceEx( FindText, ReplaceText, opt, Position );
    if k>=0 then
      TSynEdit1.SetFocus()
    else
      Beep();
  end;
end;

TReplaceDialog

Usage

See also