Table of Contents

Getting Started with TMS FNC Find Dialog

Use TTMSFNCFindDialog when users need a reusable search dialog with history, search options, and find/next/set-marker commands.

Create a Find Dialog

  1. Drop TTMSFNCFindDialog on the form.
  2. Set FindText or prefill FindList when the dialog should start with search history.
  3. Configure Options and VisibleOptions for the search controls you want to expose.
  4. Handle OnFind and OnFindNext to run the search and set AFound.
  5. Call Execute to show the dialog.
TMSFNCFindDialog1.FindText := 'customer';
TMSFNCFindDialog1.FindList.Clear;
TMSFNCFindDialog1.FindList.Add('customer');
TMSFNCFindDialog1.FindList.Add('invoice');
TMSFNCFindDialog1.AutoHistory := True;
TMSFNCFindDialog1.Options := TMSFNCFindDialog1.Options + [fdoCaseSensitive, fdoCloseIfFound];
TMSFNCFindDialog1.OnFind := TMSFNCFindDialog1Find;
TMSFNCFindDialog1.OnFindNext := TMSFNCFindDialog1FindNext;
TMSFNCFindDialog1.Execute;

Next Steps

Task Guide
Configure search options, history, and callbacks Search dialog workflow
Enable the extended multi-line search area Search dialog workflow