HTML vers .doc problème de bordure

**PhilLU** · 26/01/2016, 11h27

Bonjour,
Je cherche à sauver un fichier HTML en .doc
Je le renomme tout va bien.
Par contre je n'arrive pas à supprimer le bord sur cette page :-(

Code html :

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

1
2
3
4
5
6
7
8
9
 
<style>
.c0 {background-color: #FFFFFF;color: #000000;font-size:8pt;font-family: Tahoma;vertical-align: top}
</style>
<table border="1" cellspacing="0" cellpadding="0"  width="100%">
<tr>
<td class="c0" nowrap="nowrap">CALCIUM</td>
</tr>
</table>

Par quoi remplacer <table>... pour supprimer le bord de la page???
Rien trouvé

Merci pour vos idées

PhilLu

**Ph. B.** · 26/01/2016, 14h11

Bonjour,

Envoyé par PhilLU

Je cherche à sauver un fichier HTML en .doc
Je le renomme tout va bien.
Par contre je n'arrive pas à supprimer le bord sur cette page :-(

border="0" dans les attributs de la balise table ?

**PhilLU** · 26/01/2016, 14h50

Disons que j'ai trouvé plus simple.
Avec une routine de 3 lignes, je remplace les <table ... par <body>
et </table... par </body>

Code :

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

1
2
3
4
 
       S:=memo2.Lines[J];
       if pos('<table',S)=1 then S:='<body>';
       if pos('</table',S)=1 then S:='</body>';

Puis après avoir sauvé le fichier en HTML je le renomme en .doc

Keep It Simple Stupid

Merci pour ta réponse Philippe

Phil.

**SergioMaster** · 26/01/2016, 17h35

Envoyé par PhilLU

Avec une routine de 3 lignes, je remplace les <table ... par <body>

Hum certainement plus que 3 lignes, puisqu'il doit y avoir : la déclaration de J et la boucle sur les lignes

dépendant des versions de Delphi cela peut s'améliorer
par exemple

Code :

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

1
2
3
4
5
6
 For S in Memo2.Lines do
   begin
      if pos('<table',S)=1 then S:='<body>';
      if pos('</table',S)=1 then S:='</body>';
      .....
   end;

et/ou peut être par des expressions régulières (TRegExReplace) pour modifier directement dans memo2.lines.text

HTML vers .doc problème de bordure

Delphi

Vue hybride

Discussions similaires

Partager

Partager