ComboBox - изменение цвета формы

[kostghost]

Делал программку. Появилась проблема (помидорами, как всегда, прошу не закидывать =)
Нужно чтобы при нажатии на кнопку, проверялась выбранное в ComboBox значение и в зависимости от значения выбирался другое значение в форме. На примере. Пытался сделать:

...
procedure TForm3.Button1Click(Sender: TObject);
begin
if Combobox1.Items='Green' then Form1.Color='clmoneygreen';
end;
...

Интересует участок combobox1.items ... Как реализовать правильно?
В других темах какие-то сложные примеры... ничего не понял
Заранее спасибо.

[Stilet]

Лови огурец, а помидор полож. Мы им закусываем.

with Combobox1 do begin
 if Itemindex<>-1 then begin
  if Items[Itemindex]='Green' then Form1.Color='clmoneygreen';
 end;
end;

[kostghost]

Stilet, Замечательно! Спасибо! Все заработало!
Только еще 2 ошибки заметил: правильно
form1.Color:=clMoneyGreen;
а не
Form1.Color='clMoneyGreen';

Назрел еще вопрос:
Почему не хочет компилится файл при

ini.WriteString('Settings','formcolor',Form1.Color);

Как правильно сохранить значение Form1.Color в файл? (если вместо form1.color поставить допустим form1.caption, то все хорошо, без ошибок)

[wm_leviathan]

WriteString(const Section, Ident, Value: string);
как видите последнее значение строковое, а Form1.Color имеет тип TColor.
присваивайте цвет из comboBox

ini.WriteString('Settings','formcolor',ComboBox1.Items[i]);

Либо если уж именно формы то

ini.WriteString('Settings','formcolor',ColorToString(Form1.Color);

[SERG1980]

Запишиет вот так

ini.WriteInteger('Settings','formcolor',Form1.Color);

[wm_leviathan]

Сообщение от SERG1980

Запишиет вот так

ini.WriteInteger('Settings','formcolor',Form1.Color);

обратите внимание на 4й пост.

[kostghost]

wm_leviathan, спасибо. Воспользовался вторым способом (т.к выбор из CoomboBox необязательный). Все работает.

[SERG1980]

Сообщение от wm_leviathan

обратите внимание на 4й пост.

На что именно???

[wm_leviathan]

извиняюсь перепутал writestring и writeinteger но... если написать

ini.WriteInteger('Settings','formcolor',Form1.Color);

запишет несовсем понятное пользователю число да и вообще неудобно хранить цвета в числовых значениях. к примеру стандартный цвет формы clBtnFace это -16777201 в integer. по мне так со строками куда нагляднее.

[kostghost]

неудобно хранить цвета в числовых значениях. к примеру стандартный цвет формы clBtnFace это -16777201 в integer. по мне так со строками куда нагляднее.

Ага, нагляднее, но вот только не для каждого цвета есть свое словесное обозначение. В моем случае цвета нестандартные, пришлось все переводить под integer