Delphi Material erste Schritte Variablen Typen Datenstruktur Zuweisung Komponenten StyleGuide Kontrollstrukturen Fehler Debuggen Funktionen Prozeduren Grafik Ereignisse Programme Unit OOP Benutzung einer Klasse Projektverwaltung Muster Format String-Operationen Datei Dialoge Menü Datenbank WinAPI Zufallszahlen RE Exceptions alte Delphiseite
Pfad: Startseite / Fächer / Informatik / Delphi / RE
Autor: mk
17.08.2008 14:38:33
1642
Reguläre Ausdrücke

Beispiel

Bei der Konstruktion eines Akzeptors stellt sich in der Regel das Problem, ganze Zeichenklassen auf ein Eingabe-Zeichen abzubilden. Die Zeichenklassen kann man mit regulären Ausdrücken beschreiben. Die freie Unit regExpr von Andrey V. Sorokin hilft dieses Problem zu lösen.

  function conv(ch : char) : char;
  begin
    if ExecRegExpr('[0-9]',ch) then result := 'z'
    else
    if ExecRegExpr('[A-Za-z]',ch) then result := 'b'
    else
    if ExecRegExpr('[ \n\r\t\f]',ch) then result := 'w'
    else
    if ch = ',' then result := 'k'
    else
      result := 's'
  end;

GUI1 scan1.zip

Links

Valid XHTML 1.0! lokal