====== Vega.FindDlg — Suchen und Ersetzen ======

Die einzigen Standarddialoge in Vega, die **nicht modal** laufen. ''Execute(app)'' zeigt das Fenster und kehrt sofort zurück; was der Nutzer will, kommt über ''OnFind'', ''OnReplace'' und ''OnClose''. Der Dialog kennt weder Text noch Editor — der Handler liest ''FindText'', ''ReplaceText'' und ''Options'' und sucht selbst. Ein modaler Suchdialog wäre einer, mit dem man nicht suchen kann.

Quelldatei: ''Vega/FindDlg.lyx''

→ [[lyx_-_programmiersprache:vega:units|Alle Units]] · [[lyx_-_programmiersprache:vega:controls|Alle Steuerelemente]] · [[lyx_-_programmiersprache:vega|Vega VCL]]

----

===== Klassen =====

^ Klasse ^ Basis ^ Zweck ^
| [[lyx_-_programmiersprache:vega:controls:tfinddialog|TFindDialog]] | — | Suchen-Fenster mit Text, Optionen und „Weitersuchen“ |
| [[lyx_-_programmiersprache:vega:controls:treplacedialog|TReplaceDialog]] | [[lyx_-_programmiersprache:vega:controls:tfinddialog|TFindDialog]] | Dasselbe Fenster plus Ersetzungstext und zwei Ersetzen-Knöpfe |

===== Typaliase =====

^ Name ^ Ist ^ Zweck ^
| ''TFindEvent'' | ''fn(sender: TFindDialog): void'' | Handler beider Dialoge: ''fn(sender: TFindDialog): void'' |

===== Konstanten =====

^ Name ^ Typ ^ Wert ^ Bedeutung ^
| ''frDown'' | [[lyx_-_programmiersprache:sprache:datentypen#1_ganzzahl-typen_signiert|int64]] | ''1'' | Abwärts suchen (Bitmaske, Vorgabe) |
| ''frMatchCase'' | [[lyx_-_programmiersprache:sprache:datentypen#1_ganzzahl-typen_signiert|int64]] | ''2'' | Groß- und Kleinschreibung beachten (Bitmaske) |
| ''frWholeWord'' | [[lyx_-_programmiersprache:sprache:datentypen#1_ganzzahl-typen_signiert|int64]] | ''4'' | Nur ganze Wörter (Bitmaske) |
| ''frReplaceAll'' | [[lyx_-_programmiersprache:sprache:datentypen#1_ganzzahl-typen_signiert|int64]] | ''8'' | Alle ersetzen statt nur des nächsten Treffers (Bitmaske) |

===== Freie Funktionen =====

^ Signatur ^ Zweck ^
| ''NewFindDialog(): TFindDialog'' | Erzeugt einen Suchen-Dialog |
| ''NewReplaceDialog(): TReplaceDialog'' | Erzeugt einen Suchen-und-Ersetzen-Dialog |

----

===== Zu beachten =====

  * ''Execute'' liefert **kein** Ergebnis im Sinne von „OK gedrückt“ — es zeigt nur. Ein zweites ''Execute'' öffnet kein zweites Fenster.
  * ''Form'' ist öffentlich, weil ein nicht-modales Fenster von außen erreichbar sein muss.
  * ''BuildForm'', ''AddButtons'' und ''DialogHeight'' sind virtuell: der Ersetzen-Dialog hängt ein Feld und zwei Knöpfe an, statt das Fenster zweimal zu bauen (gemessen: 190 gegen 226 Pixel).
  * „Ersetzen“ und „Alle ersetzen“ feuern **dasselbe** ''OnReplace''; unterschieden wird über ''frReplaceAll''.
  * Weggelassen sind die ''fr*''-Bits, die in Delphi nur die Windows-Dialogvorlage steuern (''frShowHelp'', ''frHidden'', ''frDisableUpDown'' …) — Vega zeichnet den Dialog selbst.

----

===== Abhängigkeiten =====

**Importiert:** [[lyx_-_programmiersprache:vega:units:types|Vega.Types]], [[lyx_-_programmiersprache:vega:units:events|Vega.Events]], [[lyx_-_programmiersprache:vega:units:canvas|Vega.Canvas]], [[lyx_-_programmiersprache:vega:units:theme|Vega.Theme]], [[lyx_-_programmiersprache:vega:units:control|Vega.Control]], [[lyx_-_programmiersprache:vega:units:font|Vega.Font]], [[lyx_-_programmiersprache:vega:units:strings|Vega.Strings]], [[lyx_-_programmiersprache:vega:units:lists|Vega.Lists]], [[lyx_-_programmiersprache:vega:units:style|Vega.Style]], [[lyx_-_programmiersprache:vega:units:stdctrls|Vega.StdCtrls]], [[lyx_-_programmiersprache:vega:units:edits|Vega.Edits]], [[lyx_-_programmiersprache:vega:units:extras|Vega.Extras]], [[lyx_-_programmiersprache:vega:units:forms|Vega.Forms]], [[lyx_-_programmiersprache:vega:units:dialogs|Vega.Dialogs]]

**Wird importiert von:** keiner anderen Vega-Unit

Letzte Aktualisierung: 2026-08-20 — Klassen, Aufzählungen, Konstanten und freie Funktionen maschinell aus ''Vega/FindDlg.lyx'' erhoben.