Servus .
Hab mal wieder ein Problem oder besser ich drehe mich im Kreis.
Ich möchte mehrere Farbwerte in eine Ini Datei speichern, ohne für jeden Wert einen eigenen Schlüssel anlegen zu müssen.
Die Werte liegen als Array vor, habe schon versucht mit ArraytoString zu arbeiten. War aber nicht von Erfolg gekrönt, da Hexwerte (z.B. 0x00FF00) kein String ist.
Hat zufällig jemand eine Lösung oder kann mich auf den rechetn Weg schubsen?
Hi,
du kannst ja einfach Hex-Werte in Integer Umrechnen (was er ja sowieso automatisch macht, wenn du sie als String auslesen willst) und dann in die Ini speichern.
Beim auslesen einfach aus den Werten mit
Hex
[/autoit]wieder Hex-Werte machen.
Ich weiß ehrlich gesagt gar ned wo das Problem ist. Du kannst ja auch die Werte mit irgendnem Zeichen trennen und dann nachher beim auslesen mit Stringsplit trennen und dann haste wieder dein Array.
Ihm geht es um die Schlüsselnamen. - Richtig?
Du kannst doch für alle Werte denselben Schlüsselnamen verwenden. Mach ich auch oft. Einlesen und Schreiben mit INIRead(Write)Section.
Da spielt es keine Rolle, dass alle Schlüssel-Wert-Paare denselben Schlüssel verwenden.
Danke.
Hab einfach nicht dem Befehl Dec gefunden, um die Hex in Int umzuwandeln.
BugFix ich habe ein Array mit mehreren Hexwerten und die wollte ich mit ArraytoString in einen String umwandeln und dann als 1 Schlüssel in die INI schreiben.
Beim laden dann halt wieder mit Stringsplit ein Array draus machen.Dabei hat mir aber Autoit einen Strich durch die Rechnung gemacht .
Probier das jetz mit dem Umweg über Dec und Hex aus. Aber erst Morgen, mir qualmt das Hirn schon.
Nochmal ich .
Habe das jetzt probiert, und eine Lösung gefunden. Hier mal ein Testscript, wenn auch mal einer solch ein Problem hat.
#include <Array.au3>
Dim $HexArray [4] = [0xFFFFFF, 0xC0C0C0, 0x808080, 0x00AA00]
Dim $TempArray[4]
Dim $TempArray2[4]
For $i= 0 to Ubound ($HexArray) -1
$TempArray[$i] = Dec($HexArray[$i]); Umwendeln der Hex in int
Next
$Temp = _ArrayToString($HexArray); Array in einen String umwendeln
MsgBox(0,"Info",$Temp)
IniWrite (@Scriptdir&"\test.ini","Test","Test",$Temp) ; Ini schreiben
$tmp2 = IniRead (@Scriptdir&"\test.ini","Test","Test",""); Ini lesen
MsgBox(0,"Info",$Tmp2)
$tmp3 = StringSplit($tmp2,"|"); String zurück in ein Array verwandeln
_ArrayDelete($tmp3,0) ; 0. Element abschneiden
_ArrayDisplay($tmp3)
For $i= 0 to Ubound ($tmp3) -1
If $HexArray[$i] = $tmp3[$i] Then MsgBox(0,"Info","Inhalt Feld "&$i+1&" ist gleich")
Next
Edit: Da mir die ganze umwandelei gegen den Strich geht, werde ich meine Array´s verbannen.
Habe von BugFix das hier entdeckt: UDF-Sammlung: Objekt Dictionary
Mal sehen, ob ich damit klar komme.
Deine ganze Umwandelei geht aber auch einfacher:
#include <Array.au3>
Dim $HexArray[4] = [0xFFFFFF, 0xC0C0C0, 0x808080, 0x00AA00], $String
$String = ''
For $i = 0 To UBound($HexArray) - 1
$String &= '0x' & String(Hex($HexArray[$i],6))
Next
MsgBox(0,0,$String)
[/autoit] [autoit][/autoit] [autoit]$Array = StringRegExp($String, '.{8}', 3)
_ArrayDisplay($array)
Aber je nachdem, was Du vorhast kann auch das Dictionary-Objekt von Vorteil sein.
Das habe ich auch schon diverse Male benutzt. Gerade wenn Du einen Wert mit allen Werten aus dem ansonsten benutzten Array vergleichen willst, sollte man lieber das Dictionary-Objekt benutzen, denn das ist um Längen schneller.
