PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2025 → Windev 25 et champ html en IE9 ou EDGE
Windev 25 et champ html en IE9 ou EDGE
Iniciado por olivier.roble, 21,may. 2020 14:26 - 5 respuestas
Publicado el 21,mayo 2020 - 14:26
Bonjour,

j'ai migré mon projet Windev 23 en Windev 25 dans le but d'utiliser un champ HTML avec autre chose que IE7 !
j'ai donc choisi IE9 / Edge dans l'onglet détail, mais rien n'y fait... le user agent est toujours IE7 et mon code ne fonctionne toujours pas

j'ai tenter de supprimer le champ et de le recréer (avec toujours l'option IE9/Edge activée) et non ....

que faut il faire de plus ?

Merci !

Olivier
Miembro registrado
50 mensajes
Publicado el 22,mayo 2020 - 13:45
Bonjour,
En version 25, ça se règle directement dans la description du projet, onglet avancé
Miembro registrado
16 mensajes
Publicado el 24,mayo 2020 - 15:40
Bonjour,

j'ai eu quelques soucis à ce sujet à une époque, en Windev 24.
Cela c'était résolu avec cette initialisation dans le code du projet (je ne saurais retrouver la source...)

CONSTANT
KEY_CURRENTUSER_64BITS = "HKEY_CURRENT_USER\SOFTWARE\Wow6432Node"
KEY_CURRENTUSER_IE_EMULE6432 = "HKEY_CURRENT_USER\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION"
KEY_CURRENTUSER_IE_EMULE = "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION"
IE_EMUL_VAL = 0
FIN

gsExeName is string = fExtractPath(ExeInfo(exeName), fFileName + fExtension)

InitInternetExplorer()


et la Procédure InitInternetExplorer():
Procedure InitInternetExplorer()

//Permet de forcer l'utilisation de la dernière version d'IE:
//Pour l'utilisateur en cours, mais ne nécessite pas les droits d'admin pour écrire dans cette clé
//Ecrire dans la clé principal
IF NOT RegistryExist(KEY_CURRENTUSER_IE_EMULE) THEN
RegistryCreateKey(KEY_CURRENTUSER_IE_EMULE)
END
RegistrySetValue(KEY_CURRENTUSER_IE_EMULE, gsExeName, IE_EMUL_VAL, RegistryTypeInt)

//Voir si la machine est en 64 Bits, si oui créé la clé pour les applications 32 bits qui tournent sur 64 Bits.
IF RegistreExiste(KEY_CURRENTUSER_64BITS) THEN
IF NOT RegistryExist(KEY_CURRENTUSER_IE_EMULE6432) THEN
RegistryCreateKey(KEY_CURRENTUSER_IE_EMULE6432)
END
RegistrySetValue(KEY_CURRENTUSER_IE_EMULE6432, gsExeName, IE_EMUL_VAL, RegistryTypeInt)
END


Grégoire
Miembro registrado
16 mensajes
Publicado el 24,mayo 2020 - 15:44
(bizarre, je ne peux pas éditer le message...)

... où la constante IE_EMUL_VAL permet de définir la version à utiliser. ( 0 pour la version la plus à jour).

Grégoire
Miembro registrado
4.362 mensajes
Publicado el 24,mayo 2020 - 15:56
Greg.D a écrit :
(bizarre, je ne peux pas éditer le message...)

Ne t'inquiète pas ça fait 2 ou 3 mois que la fonction de correction de message ne fonctionne plus

--
Il y a peut être plus simple, mais, ça tourne
Publicado el 04,junio 2020 - 11:41
Pour info j'ai résolu mon problème en initialisant le champ html avec le code suivant (dans les propriétés du champs)
Je pense qu'ainsi, le champ se déclare avec Edge et il y reste.

<html lang="fr">

<head>
<meta charset="utf-8" />
<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=no">
<title>Mercier :: Groupe Néodis</title>
</head>

<body>
</body>
</html>