Regulär bis zum abwinken

[cruiser]

Delphi-Quellcode:

RegEx.Expression := '/\*\s+TODO\s+(\d+)\s+-o(.*)\s+-c(.*)\s+:\s+(.*)\*/';
// dazu:
RegEx.ModifierG := false;
RegEx.ModifierS := true;
RegEx.ModifierI := true;
RegEx.ModifierM := true;
//oder kurz:
RegEx.ModifierStr := 'msi-g';

Dann in einer While-Schleife mit ExecPos suchen und die Ergebnisse in der Schleife auswerten:

RegEx.MatchPos[0] > Caret-Position des TODO's
RegEx.Match[1] > Priorität
RegEx.Match[2] > Besitzer (-o)
RegEx.Match[3] > Kategorie (-c)
RegEx.Match[4] > Text

Mit dem Demo sollt es verständlich sein.