Hi, leider komme ich bei meiner Konstruktion nicht alleine weiter.
Ich möchte eine Language-Datei mit IniReadSection einlesen und mittels Array und For-Schleife ausgeben.
Die Datei wird richtig gelesen, wie mein Gegenversuch mit MsgBox ergab.
Spoiler anzeigen
Func _ini_read_lang()
;read_options
$actual_lang_name = IniRead($ini, "language", "current", "Deutsch.lng")
$actual_lang = $lang_dir & "\" & $actual_lang_name
;ini_read_lang
Global $languages = IniReadSection($actual_lang, "default_values")
If @error Then MsgBox(4096, "", "Error occurred, probably no lng file.")
Dim $Label[13] = ['', $fileMenu, $startItem, $exitItem, $OptMenu, $langItem, $helpItem, $aboutItem, $gbSources, $lbLocation, $gbFormat, $bnStart, $bnCancel]
For $i = 1 To $languages[0][0] ;< funktioniert !!
;For $i = 1 To 12 ;< funktioniert nicht ??
MsgBox(4096, "", "Key: " & $languages[$i][0] & @CRLF & "Value: " & $languages[$i][1]) ;< funktioniert !!
;GUICtrlSetData($Label[$i], $languages[$i][1]) ;< funktioniert nicht ??
Next
EndFunc ;==>_ini_read_lang
[/autoit]
Language.ini
Spoiler anzeigen
[default_values]
$fileMenu_txt=Datei
$startItem_txt=Sichern
$exitItem_txt=Beenden
$OptMenu_txt=Optionen
$langItem_txt=Sprache
$helpItem_txt=Info
$aboutItem_txt=Über...
$gbSources_txt=Quelle:
$lbLocation_txt=Speicherort:
$gbFormat_txt=Format:
$bnStart_txt=Sichern
$bnCancel_txt=Beenden
Danke für mögliche Hilfe