Farben aus Ini heraus benutzen

[-NIP-]

Hi,
in diesem Thread beziehe ich mich in diesem Thread
auf Robert G's Antwort:

Zitat von Robert_G:

Die Farben bekommt ihr mit "ColorToString" in einen String und mit "StringToColor" wieder zurück konvertiert.

Bei mir klappt es zwar mit ColorToString die Farben in die Ini zu schreiben, aber ich kriege sie nicht wieder mit
StringToColor ausgelesen, oder liegt es an mir?

Code:

Farben:=TIniFile.Create('FarbenConfig.ini');
Panel6.Color:=Farben.ReadString('Hauptfarben','Vorderfarbe',StringToColor(''));

Bitte helfen

-NIP-

[alcaeus]

Hi -NIP-,

du liest es falsch aus. Der richtige Aufruf müsste so aussehen:

Delphi-Quellcode:

Farben:=TIniFile.Create('FarbenConfig.ini'); 
Panel6.Color:=StringToColor(Farben.ReadString('Hauptfarben','Vorderfarbe','clBtnFace'));

Der letzte Parameter ist der Default-Wert.
Weiters willst du ja nicht nur den Default-Wert umwandeln, sondern was auch immer ausgelesen wird.

Greetz
alcaeus

[Bernhard Geyer]

Zitat von -NIP-:

Bei mir klappt es zwar mit ColorToString die Farben in die Ini zu schreiben, aber ich kriege sie nicht wieder mit
StringToColor ausgelesen, oder liegt es an mir?

Code:

Farben:=TIniFile.Create('FarbenConfig.ini');
Panel6.Color:=Farben.ReadString('Hauptfarben','Vorderfarbe',StringToColor(''));

Bitte helfen

-NIP-

Der Code ist etwas falsch. Der String aus der Ini muß gewandelt werden, nicht der Default-Wert:
Panel6.Color:= StringToColor(Farben.ReadString('Hauptfarben','Vorderfarbe', ColorToString(DefaultColor));

[-NIP-]

DANKE!!!

-NIP-

[Helmi]

Hallo

Ich speichere Farben in Ini-Dateien immer als Integer

Code:

ReadInteger('Farben', 'Definitionen', clblue);
WriteInteger('Farben', 'Definitionen', Def_Farbe);

mfg
Helmi