DruckenMister WongFacebook

Text mit einem FindDialog suchen

System Win9x, WinNT, Win2000, WinXP, Vista, Win7
Ab Delphi-Version Delphi 1
Letzte Änderung 28.09.2010

Die Komponente TFindDialog von Delphi stellt dem Anwender einen Standard-Dialog zum Durchsuchen von Texten zur Verfügung. Dieser Artikel zeigt, wie Sie den Text eines TMemo-Feldes durchsuchen. Es werden die Optionen "Groß/Kleinschreibung" und "Ganze Wörter suchen" berücksichtigt. Die Suche beginnt stets an der Stelle des Cursor. Wird ein Suchbegriff gefunden, wird dieser im Text selektiert.Schreiben Sie in das OnFind-Ereignis des TFindDialogs folgendes:

Der FindDialog wird folgendermaßen geöffnet:


procedure TForm1.Button1Click(Sender: TObject);
begin
  FindDialog1.Execute;
end;