Tidhttp problème d'accent !

Question

Bonjour,

J'utilise le composant Tidhttp afin de soumettre une requette à un site web via la methode Get.

J'utilise bêtement la fonction comme suit :

IdHttp1.Get(Format('http://www.mysite.com/send?nom=%s&texte=%s',
    [IdHTTP1.URL.PathEncode(EditNom.Text),IdHTTP1.URL.PathEncode(Memo.Text)]));

Cependant tout les lettres avec accent sont mal traduite et dès qu'il y a un caractère "&" tout ce qui est après n'est pas interprété.

Que faut il que je fasse pour encoder correctement le texte ?

Si vous avez des suggestions je suis preneur.
Merci d'avance.

cs_cantador · Answer

Bonjour,

et avec un TStream, comme ça ?


procedure TForm1.Button1Click(Sender: TObject);
var
MaReponse : TStringStream;
MonUrl: string;
begin
MonUrl:= 'http://www.mysite.com/send?nom=%s&texte=%s';
MaReponse := TStringStream.Create;
try
IdHTTP1.Get(MonUrl, MaReponse);
Memo1.Text := MaReponse.DataString;
finally
FreeAndNil(MaReponse);
end;
end;


vois-tu les accents ?

cantador

Ulixes2 · Answer

Bonsoir,

Mon problème est au niveau du texte à envoyer et petite précision je sous sous delphi 2009 et donc IdHTTP1.Get() n'a qu'un seul paramètre.

Pour ce qui est du retour du site je n'ai aucun problème d'interprétation.

Merci quand même cela m'a permis de chercher sur d'autre plan sans pour autant trouver de solution

cs_cantador · Answer

Bonjour,

ne pas hésiter à changer de composant et se servir des fonctions de conversion Ansi et Utf8 existantes sous D9.


cantador

Tidhttp problème d'accent !

3 réponses

Votre réponse

Discussions similaires