Plantage sans message sur un get d'une url
Bonjour,
Voici le contexte informatique
PC, processeur x64, Windows 10 1903
Lazarus 2.0.2
Version FPC : 3.0.4 révision SVN : 60954
x86_64-win64-win32/win64
Depuis maintenant 2 à 3 mois, je n'arrive plus à faire des modifications dans un de mes logiciels.
Les versions compilées antérieurement continuent de fonctionner parfaitement.
La version que je souhaite modifier se compile sans erreur et se lance sans erreur jusqu'au moment où je fais la commande qui m'amène à utiliser la procedure qui normalement rapatrie les information d'url.
Url validée par l'envoi direct via firefox. Toutes les infos demandées s'affichent bien à l'écran.
Classes, TypeGen, Dialogs, VarGen, SysUtils, MD5, fphttpclient, Constantes, laz2_Dom, laz2_XMLRead, laz2_XMLWrite;
Code:
1
2
3
4
5
6
7
8
9
10
| function requete_calameo(url : string) : String;
begin
with TFPHttpClient.Create(nil) do
try
result := Get(url);
finally
free;
end;
end; |
A ce moment plus rien ne se passe et Lazarus ne fait remonter aucune erreur.
De même si je recompile le source d'une ancienne version, j'ai le même dysfonctionnement.
j'ai beaucoup cherché sur les forums et fait pas mal d'essais, il semble qu'il que la fonction get ne soit plus correctement appelée.
Si quelqu'un avait soit une idée soit une piste de recherche à me proposer j'en serai très heureux.
Je suis passé à Lazarus il y a 2 ans après avoir pas mal travaillé avec Delphi.
Merci d'avance.
