Сохранение цвета форми

← →
gyry (2004-04-23 03:06) [0]

Привет Мастера!!! Как сохранить цвет форми (*.exe-файла), если я его изменил в ходе работы программы.

← →
Sun bittern © (2004-04-23 06:04) [1]

http://delphimaster.net/view/1-1082486140/

INI файл

← →
Sun bittern © (2004-04-23 06:14) [2]

http://delphimaster.net/view/1-1082486140/

← →
Леприкон © (2004-04-23 10:02) [3]

См. функции GetRValue, GetGValue, GetBValue, RGB.

← →
gyry (2004-04-23 23:55) [4]

To [3]
Ну разбил я его на составные цвета, сохранил в .INI-файле, А КАК ПРИ ЗАГРУЗКИ ПРОГИ СКЛЕПАТЬ ИХ В ОДИН ЦВЕТ!!!

← →
evvcom © (2004-04-24 00:07) [5]

Можно использовать широко известную, свободно распространяемую библиотеку RxLib, в которой есть компонент TFormStorage. Также в ней есть много других приятных мелочей и не только.

← →
ALF (2004-04-24 00:08) [6]

Сохраняй в ini-файле в одну строку (вернее, это будет integer):
типа
color=$00FF66CC (цвет задается 3мя последними значениями RGB: FF66CC). Зачем первые нули должны стоять - честно, говоря, не знаю, но работает :) а без них - нет

> Зачем первые нули должны стоять - честно, говоря, не знаю, но работает :) а без них - нет
Да вроде все нормально работает !!! :\

Мдя...
>А КАК ПРИ ЗАГРУЗКИ ПРОГИ СКЛЕПАТЬ ИХ В ОДИН ЦВЕТ!!!
Это не обязательно.
Просто сохраняй цвет как integer.
var i:TINiFile; begin i.WriteInteger("Settings","Form_Color",Form1.Color); end;
И так же загружай
var i:TINiFile; begin i.ReadInteger("Settings","Form_Color",clBtnFace); end;

Сохранение цвета форми Найти похожие ветки