Bonjour
Nouveau problème de type Je finirai bien un jour par piger pourquoi Delphi demande de faire ce genre de manipulation.
Là, c'est un problème entre le composant TPerlRegEx qui semble renvoyer une string quand il trouve un pattern, et la fonction Format() qui attend un TStrings:
J'ai naïvement essayé ça, mais ça marche pas:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 var Title : String; begin If PerlRegEx1.Match then begin //E2010 Incompatible types: 'string' and 'TStrings' //SQL := Format('INSERT INTO books (title) VALUES ("%s") WHERE isbn="%s"',[PerlRegEx1.SubExpressions[1],FieldByName('isbn').Text]); Title := PerlRegEx1.SubExpressions[1]; SQL := Format('INSERT INTO books (title) VALUES ("%s")',[Title]);
Quelqu'un a déjà vu ça et aurait une idée?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Title := TStrings(PerlRegEx1.SubExpressions[1]);
Merci.
Partager