PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2025 → Passer un paramètre pour renseigner la constante d'une fonction
Passer un paramètre pour renseigner la constante d'une fonction
Iniciado por damien.defeux, 20,dic. 2018 15:03 - 2 respuestas
Publicado el 20,diciembre 2018 - 15:03
Bonjour,

Comment renseigner la constante d'une fonction par une variable du code.

Voilà l'idée, mais qui ne fonctionne pas :

Var_option est un chaîne = "fRépertoire" // information venant d'un fichier .ini par exemple

ret est une chaîne = fExtraitChemin("c:\temp\toto.exe",Var_option)

Info(ret)

Merci de vos propositions.
Publicado el 20,diciembre 2018 - 17:29
Bonjour,

sauf erreur ces constantes ne sont pas des chaines, mais des entier.
Donc il faut d'abord récupérer la valeur de la constante, puis utiliser cette valeur.
Mais il est conseillé d'utiliser les constantes, si leur valeur évolue au cours des versions de WinDev, ton code ne marchera plus.

Dominique
Miembro registrado
23 mensajes
Publicado el 21,diciembre 2018 - 15:37
Comme dit par Bodin Dominique, les constante sont des entiers.

donc si tu veut enregistre dans une variable c'est la valeur qu'il faut enregistrer dans ton ini:

exemple:

//Enregistrement
SELON Combo_Option
CAS 2
INIEcrit("SMTP","OPTION",emailOptionSécuriséTLS)
CAS 3
INIEcrit("SMTP","OPTION",optionSSL)
AUTRE CAS
INIEcrit("SMTP","OPTION",emailOptionDéfaut)
FIN
//Lecture
var = val(INILit("SMTP","OPTION","-1"))
SI var = -1 ALORS
Info("Erreur")
RETOUR
FIN

et tu relis simplement le code mais comme dit plus haut si évolution le code n'est peut être plus le même.

Dans ce cas la pense plutôt a crée un code pour ton logiciel

Exemple:
CONSTANTE
CONST_DEF = 1
CONST_TLS = 2
CONST_SSL = 3
FIN
//Enregistrement
SELON Combo_Option
CAS 2
INIEcrit("SMTP","OPTION",CONST_TLS)
CAS 3
INIEcrit("SMTP","OPTION",CONST_SSL)
AUTRE CAS
INIEcrit("SMTP","OPTION",CONST_DEF)
FIN
//Lecture
SELON val(INILit("SMTP","OPTION","0"))
CAS CONST_DEF
var = emailOptionDéfaut
CAS CONST_TLS
var = emailOptionSécuriséTLS
CAS CONST_SSL
var = optionSSL
AUTRE CAS
Info("Erreur")
RETOUR
FIN

et la ton compte fonctionnera toujours même après une recompilation où le code chez PC SOFT à été changer (ce qui devrai pas arriver mais bon)

--
Etienne
Staff tactique
24PM - Agence de développement stratégique coopérative
www.24pm.be
Mensaje modificado, 21,diciembre 2018 - 15:39