Discussion :

[Maglight]

J'ai une petite routine que me permet de charge dans une variable de type string le contenu d'un document txt.

Code :

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

1
2
3
4
5
6
7
AssignFile(FTxt, 'Chemin_du_document');
Reset(FTxt);
while not Eof(FTxt) do
begin
  Read(FTxt, ch);
  Chaine := Chaine + ch;
end;

Cela fonctionne bien jusque là.
Le problème est que lorsque mon document est de type htm, je ne voudrai récupérer que le texte en lui même alors que la je récupère tout son code source.
Le but est de mettre mon texte dans un zone Memo pour que l'on puisse ensuite le modifier et mettre à jour les sources.
Avez-vous une piste...

[ShaiLeTroll]

Pour lire un fichier texte, le charger en mémoire et l'afficher, il y a nettement plus simple, plus rapide, moins gourmand en réallocation mémoire :

Code :

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

Memo1.Lines.LoadFromFile('Chemin_du_document');

et

Code :

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

Memo1.Lines.SaveToFile('Chemin_du_document');

L'utilisation de AssignFile, Read, ... est plus adapté à une lecture pour traitement, l'opération suivante est affreusement couteuse en temps

Code :

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

Chaine := Chaine + ch;

Sinon, un HTM, c'est un format plus évolé, tu perdras la mise en page avec un Memo, affiche le dans un TWebBrowser, voir Afficher page HTML dans Delphi
Pour la modification, un outil plus évolué sera requis ...

[Droïde Système7]

Bonjour,

Peut-être une autre piste plus simple et moins académique :
Celle d'afficher la page (si fichier .htm etc.) dans un butineur et d'ensuite faire un "tout sélectionner" afin de récupérer le texte sans passer par le source.

[Maglight]

Mon problème est que l'on me demande de partir de deux modèles, l'un txt et l'autre htm.
Ces modèles doivent être chargé dans une zone (actuellement une zone mémo) afin de l'utilisateur puisse y apporter des modifications si il le souhaite.
Mon pb est que dans le cas d'une page htm que j'affiche dans un browser, j'ai la bonne apparence mais cela n'est pas modifiable (à priori).
Si par contre j'utilise

Code :

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

MemoMail.Lines.LoadFromFile(chemin);

j'ai mon code source qui apparait dans MemoMail et c'est incompréhensible
et si j'utilise

Code :

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

MemoMail.Text := WebBrowser1.OleObject.Document.Body.InnerText;

j'ai le texte de mon document htm mais sans la gestion des polices (gras, italique, type de police,...)
Dans ce cas, la question que je me pose c'est comment faire si ensuite je modifie ce texte pour le remettre proprement dans mon modèle htm.
Si j'utilise
WebBrowser1.OleObject.Document.Body.InnerText:=MemoMail.Text ;
après avoir fait mes modifications, j'ai bien dans mon WebBrowser mes modifications mais j'ai perdu la gestion des polices ainsi que tout ce qui n'était pas du texte.
Là je sèche complètement...

[Droïde Système7]

Bonjour,

Si j'ai bien compris :
Ton cahier des charge stipule que tu charges (si cas html) un fichier HTML en texte brut (ou source), mais que la gestion du formatage de texte soit possible ?



C'est pour un devoir de cours ou bien est-ce une demande de ton patron ?

[Maglight]

C'est une demande de mon patron.
j'ai avancé en faisant un petite triche.
Je récupère le body de mon document au moyen de

Code :

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

strCodeSourceHtm := WebBrowser1.OleObject.Document.Body.InnerHTML;

Dans mon document htm j'ai mis une mot clé réservé à savoir /*MESSAGE*/ et je fais un stringreplace de ma variable strCodeSourceHtm.
Mon pb maintenant est de réinjecté dans mon document source mon body ainsi modifié car j'ai d'autres élément dans mon modèle auquel je ne veux pas toucher.
Je ne trouve pas actuellement de commande me permettant de remplacer d'un coup le contenu du body de mon document.

[Droïde Système7]

Pas facile à suivre ton histoire

Mais si j'ai bien compris, question récup Body, je verrais un truc comme :

1. Ouvrir une StringList
2. Charger le fichier complet HTML dedans lorsque...
3. Détection body ouvrant
4. Top départ pour copier tout le contenu jusque...
5. Détecter le Body fermant
6. Stop action copy
7. Sélectionner cette partie de texte
8. Couper cette partie
9. Injection de ton body traité

Enfin c'est très mal expliqué ; mais en gros il s'agit du principe de la sélection d'un bloc de texte et sur ce bloc sélectionné ; un simple "Coller" effectue le remplacement d'un seul coup.

Enfin, c'est l'algo que je verrais, mais je n'ai certainement pas trop bien saisi.

@+

Edit : En effet, à te relire, puisque tu as réussi la récup de ton body, j'ai mal pigé. Mais la méthode du "tout sélectionner" reste valable, je pense.