If Result = DialogResponse.POSITIVE Then
If TabHost1.CurrentTab = 0 Then
ListView1.Color = cd.RGB ' siehe hier'
farbe(0) = cd.RGB
End If
' usw.
Mindestens oben beim SUB Farben_Click werden beim direkten Setzen
der Farben in den einzelnen Listviews die Farben korrekt angezeigt.
Dort sollen sie dann auch gleich in das Array farbe(), sodaß ich immer
die gleiche Reihenfolge habe.
Die habe ich schon mal vorher mit einer Messagebox anzeigen lassen.
Das sind Minus - Werte. Ist das richtig so ?
Bis dahin funktioniert es ja.
Ich probiere dann mal, was ich beim SUB LeseFarben bekomme :
Beim Auswählen und Setzen zeigen mir die Array-Elemente,
wenn ich nacheinander rot, grün, blau, weiß auswähle
-65535 - rot, -16711936 - grün, -16776961 - blau, -1 - weiß
an.
Beim Lesen das erste -1, dann 3 mal 0.
Also immer nur die zuletzt gewählte Farbe.
Daher denke ich, daß da beim Speichern oder Einlesen etwas schief geht.