Discussion :

[mavrix91]

Bonjour,

J'ai un fichier XML et je veux extraire certaines informations du texte de ce fichier. C'est ok quand tout est en ligne mais , KO quand j'ai des retours chariots/sauts de ligne ( #13#10 )

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
 
 
uses ...  System.RegularExpressions 
 
...
 
procedure TForm42.Button1Click(Sender: TObject);
 
const   chaine1 ='<transformation> <info> <name>NOM_FICHIER</name>';
 
const   chaine2 ='<transformation>'#13#10'<info>'#13#10'<name>NOM_FICHIER</name>';
 
var
  regex : TRegEx;
  Match  : TMatch;
begin
 
  Match :=regex.Match(chaine1,'<transformation>.+<name>(.+)</name>');
 
//  Match :=regex.Match(chaine2,'<transformation>.+<name>(.+)</name>');
 
  if Match.Success then
  begin
    showMessage('OK');
    ShowMessage ( Match.Groups[1].Value );
  end
  else
  begin
    showMessage('Non rien :( ');
  end;
 
end;

Le code fonctionne avec la chaine1 mais pas la chaine2 .


Est ce que vous avez une idée de comment extraire mes infos dans un texte avec sauts de ligne ?


Merci d'avance .

[tourlourou]

Bonjour,
Ne connaissant pas ces expressions rationnelles, j'utiliserais barbarement : chaine1 := StringReplace(chaine2, CRLF, ' ', [rfReplaceAll]); qui a pê de plus beaux équivalents et surtout un motif adaptable en regexp...

[mavrix91]

Bonjour,
Ne connaissant pas ces expressions rationnelles, j'utiliserais barbarement : chaine1 := StringReplace(chaine2, CRLF, ' ', [rfReplaceAll]); qui a pê de plus beaux équivalents et surtout un motif adaptable en regexp...

Bonjour,
J'y ai pensé pour d'autres raisons je dois conserver la structure inter-balises , pour faire des découpage plus complexes . C'est juste un exemple simple .
Merci en tout cas .

[CosmoKnacki]

L'option que tu cherches est roSingleLine, mais tu t'exposes à des déconvenus en t'attaquant à du XML comme avec une simple chaîne. Il doit bien avoir des parsers DOM ou SAX pour faire ça avec Delphi.

[SergioMaster]

Perso, je trouve les expressions mal "fagotées", je suggère un outil comme Expresso pour mieux maitriser ça

(\x0A\x0D)? devrait remplacer un #13#10

soit une expression comme cela

Code RegEx :

Sélectionner tout - Visualiser dans une fenêtre à part

'<transformation>(\x0A\x0D)?<info>(\x0A\x0D)?<name>NOM_FICHIER</name>'

mais il y a certainement mieux

[Andnotor]

Il y a aussi des espaces. En multilines on pourrait l'écrire ainsi : <transformation>(?: |\R)?<info>(?: |\R)?<name>(.+)</name>.

En singleline, attention s'il peut y avoir plusieurs fois la même information, il faudra passer en mode lazy sous peine de ne récupérer que le dernier NOM_FICHIER : <transformation>.+?<name>(.+?)</name>.


ps : bizarre que ça fonctionne sous Delphi, le standard PCRE demande normalement que les / soient échappés : <\/name> (les deux écritures fonctionnent)

[CosmoKnacki]

ps : bizarre que ça fonctionne sous Delphi, le standard PCRE demande normalement que les / soient échappés : <\/name> (les deux écritures fonctionnent)

Non, c'est juste une croyance répandue (du fait que le slash est souvant utilisé dans plusieurs langages pour délimiter les patterns), mais ce n'est pas un caractère spécial.
En dehors des classes de caractères, Il y en a douze à échapper: . ? * + ( ) [ { | \ ^ $ (et encore pour le {, suivant le contexte on peut s'en passer)

[oneDev]

A la place de .+, j'aurai plutôt utilisé (.|\n)* ou ((?:.|\n)*) pour capturer le groupe