Jak zapisać dowolny color np. do pliku?

DelphiChcę aby po wyściu z programu ustawiwnia kolorów (tło formatki, color label itp.) zostały zapisane np. pliku lub w inny sposób. Jak to zrobić?

Użyj TIniFile

Zapisujesz np. tak

IniFile.WriteInteger('Kolory','Forma',Integer(Form1.Color));

a odczytujesz tak

Form1.Color:=TColor(IniFile.ReadInteger('Kolory','Forma',Integer(Form1.Color)));

Możesz też zapisać kolor do pliku tekstowego np. tak

\
assignfile(f,'ustawienia.col');
rewrite(f);
writeln(f,Form1.color);
closefile(f);

a odczytujesz w następujący sposób np w zdarzeniu onCreate Formy

var kolor:TColor;
.......
assignfile(f,'ustawienia.col');
reset(f);
readln(f,kolor);
closefile(f);
Form1.color:=kolor;

Czy w przpadku zmniany wielkości czcionki lub jej kształu postępuje się podobnie?

AlfredX napisał(a)

Czy w przpadku zmniany wielkości czcionki lub jej kształu postępuje się podobnie?

Niom dokładnie - na takiej zasadzie się to robi

Wszystko super działa.
Dziękuję Alfred [browar]