//
// Code by drcharly93, WDForge
// http://old.wdforge.org/
//
cmbName est une chaîne = "ComboIni"
ResFile est une chaîne
sLang est une chaîne
sFile est une chaîne
//
// Code by drcharly93, WDForge
// http://old.wdforge.org/
//
ResFile = fRep(fRepEnCours() + "\languages\*.ini", frFichier)
TANTQUE ResFile <> ""
sLang = INILit("Language", "FileLanguage", "", ResFile)
sFile = INILit("Language", "FileName", "", ResFile)
SI sLang <> "" ALORS ListeAjoute(cmbName, sLang + Répète(" ", 50) + TAB + sFile)
ResFile = fRep("", frFichier)
FIN
//
// Code by drcharly93, WDForge
// http://old.wdforge.org/
//
sFile = ExtraitChaîne({cmbName, indChamp}..ValeurAffichée, 2)
INIEcrit("Config", "UsedLanguage", sFile, fRepEnCours() + "\Config.ini")
ComboIni = ResFile
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=5124&post_id=21145