Einzelnen Beitrag anzeigen

Benutzerbild von colder
colder

Registriert seit: 23. Jul 2004
Ort: Bonn
30 Beiträge
 
Delphi 7 Professional
 
#1

Regulär bis zum abwinken

  Alt 13. Mai 2006, 00:35
Hallo,

aus Gründen der flexibilität, habe ich mich für TRegExpr enschieden.
Im Moment habe ich allerdings das Gefühl, nicht umbedingt die richtige
Entscheidung getroffen zu haben. Was nicht an TRegExpr liegt sondern an mir.

Reguläre Ausdrücke - ein Buch mit sieben Sigeln.

Folgende zwei Sachen suche ich.


Delphi-Quellcode:
  Dim sFolder As String
  
   SetVars ()
   mssPath.SetConst (ccConstDir)

// Dieses TODO

/* TODO 1 -oDecke -cErledigen : Dies ist ein Todo mit einer Zeile */


  Select (GetOsLang ())
    Case (ccLangDE)
      sFolder = "Briefpapier"
      If (iCurrentVersion < 10)
        sFolder = "Stationery"
      EndIf
      If (iCurrentVersion = 10)
        sFolder = "Stationery"
      EndIf
    Default
      sFolder = "Stationery"
  EndSelect

// Dieses TODO

/* TODO 2 -oUschi -cBeachten :
Dies ist ein Todo
mit zwei zeilen. */

  If (cpStoring)
    Select (iCurrentVersion)
Mit folgender Expression bekomme ich schon mal das erste TODO (einzeilig) heraus
/\*(s*|.*)todo.*\*/
das zweite TODO (dreizeilig) bekomme ich nicht zu sehen. Ich habe jetzt schon einige
Stunden rumgebastelt, und langsam keinen Bock mehr.
Vieleicht hat ja jemand mitleid und kann mir weiterhelfen. Und wenn ich schon
am betteln bin, vieleicht weiss jemand wie ich dann noch an die Parameter in den
ToDos herankomme (-o und/oder -c)

ansonsten erstmal eine gute Nacht.
Bei schwierigen Problemen entscheiden wir uns einfach für die richtige Lösung.
  Mit Zitat antworten Zitat