RegularExpression (rtl)

<source lang='delphi'>Function RegularExpression(const aSource:string; const aExpression:string; aResult:TStrings):integer;</source>

Cette fonction parse une chaine suivant une expression régulière et retourne les différents tokens identifiés dans une liste de chaîne.

Result	Nombre de token identifiés.
aSource	Chaine de caractère à parser.
aExpression	Expression régulière.
aResult	Liste de chaîne recevant les tokens.

Exemple

<source lang='delphi'> //Function RegExpDonneeBaliseFormat(aStr:string; aExprReg:string):string; var vStrList:TStringList; begin

Result := ;
vStrList := TStringList.Create;
RegularExpression( aStr ,aExprReg ,vStrList);

if (vStrList.count=0) then
  exit;

if (vStrList.count=1) then
  result := vStrList.Strings[0]
else
  raise ERule.Create(Format(_TP('Exception RegExpDonneeBaliseFormat , donnée lue : "%s", expression : "%s", retourne plusieurs réponses'),[varDonneeLue,aExprReg]));

end; </source>

Voir aussi:

{{#if:Développement DSM|

{{#if:Développement DSM|— Développement DSM |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}