IDHTTP , IDPOP3 ,IDSMTP EN GRANDE PARTIE EXPLIQUÉE

Signaler
Messages postés
833
Date d'inscription
dimanche 6 janvier 2002
Statut
Membre
Dernière intervention
3 novembre 2005
-
Messages postés
220
Date d'inscription
lundi 30 octobre 2000
Statut
Membre
Dernière intervention
15 juillet 2013
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/12411-idhttp-idpop3-idsmtp-en-grande-partie-expliquee

Messages postés
220
Date d'inscription
lundi 30 octobre 2000
Statut
Membre
Dernière intervention
15 juillet 2013

d'abord, 10/10 pour ce tuto, arrive juste à point...
deux petites choses.
Quand on fait un IdPOP31.Retrieve ou un IdPOP31.RetrieveHeader, il faut penser à faire Clear sur le IdMessage avant de rapeler la fonction une nouvelle fois pour charger le message suivant. Sinon, (chez moi en tout cas) il reste sur le premier message et ne charge jamais les autres. (sans erreur pour autant mais avec 3 ou 4 messages identiques).

Ensuite, je reçoit des messages avec des caractères bizares..
?UTF-8?B?UG9ydGFibGU=?= pour "portable" ou "téléphone" pour "téléphone".
C'est un problème de jeu de caractère mais je n'ai pas encore la réponse.
Je continue de chercher dans mon coin mais si quelqu'un à une solution, merci de me la donner...

Barbichette
Messages postés
19
Date d'inscription
samedi 31 janvier 2004
Statut
Membre
Dernière intervention
22 novembre 2008

Pour répondre à Foucteau :

Avec la version indy 10 :
variables :
i : integer ;
texte : TIdText ;
MemoCorps : Tmemo ;
MSG: TIdMessage;

unité à ajouter : TIdText

code :
for i := 0 to msg.MessageParts.Count -1 do
begin
if msg.MessageParts[i].PartType = mptText then
begin
texte := TIdText.Create(nil);
texte.Assign(msg.MessageParts[i]) ;
MemoCorps.Text := texte.Body.Text ;
texte.free ;
end ;
end ;
Messages postés
19
Date d'inscription
samedi 31 janvier 2004
Statut
Membre
Dernière intervention
22 novembre 2008

Ca ne fonctionne pas avec la version 10 !
Messages postés
1
Date d'inscription
vendredi 6 octobre 2006
Statut
Membre
Dernière intervention
17 octobre 2006

Merci pour votre aide. Ca marche tres bien. Merci!!!
Afficher les 16 commentaires