Discussion :

[maetela]

Bonjour je voudrais supprimer un <td></td> dans le code d'une page et ensuite en insérer un nouveau.
Comment puis-je faire? et comment bien localiser le <td></td> que je souhaite modifier?
Si quelqu'un sait...
Merci bcp

[ShaiLeTroll]

Voir ICI

Ewemple, change la couleur ...

Code :

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

1
2
3
HTMLStr := TWebBrowser(Sender).OleObject.Document.Body.InnerHTML;
HTMLStr := StringReplace(HTMLStr, 'rgb(110,164,255)', 'rgb(212,208,200)', [rfReplaceAll, rfIgnoreCase]);
TWebBrowser(Sender).OleObject.Document.Body.InnerHTML := HTMLStr;

[maetela]

Cela fonctionne merci bcp par conte lorsque je veux changer plusieurs éléments du code, delphi ne le prend pas en compte
(exemple:
HTMLStr := StringReplace(HTMLStr, 'input size="50"','toto', [rfReplaceAll, rfIgnoreCase]);
)
à cause des espaces et des "" j'ai remplacé les espaces par &nbsp mais il ne le prend toujours pas en compte , que serait-t-il possible de mettre ???

[ShaiLeTroll]

euh, je n'ai pas bien compris mais sache que tu peux mettre '' pour indiquer dans une chaine un seul ', ne pas confondre '' (deux fois la touche 4) et " (la touche 3)

Code :

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

1
2
ShowMessage('aujourd''hui'); // affichera aujourd'hui
ShowMessage('aujourd"hui'); // affichera aujourd"hui

Après, il faut peut-être parsé plus finement ton texte pour gérer les variantes possibles d'une même saisi, faudrait voir un composant pour convertir ton HTML en un XML exploitable via TXMLDocument, et la routine inverse ... tu pourrais ainsi déplacer des noeuds entiers ...