Combobox itemindex

[beemoto]

народ!
помогите:
как мне сохранить в ини активный текст в комбобоксе!?
так пытаюсь:

  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  ini.WriteBool('tools', 'Language', combobox1.Items.Count;
  ini.WriteBool('tools', 'Skin', edit1.text);
  ini.Free;

[Neeter]

WriteBool - Это запись булевского значения(boolean), записывать данные в ини-файл надо по типу значения.
Надо так:

  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  ini.WriteInteger('tools', 'Language', combobox1.Items.Count);
  ini.WriteString('tools', 'Skin', edit1.text);
  ini.Free;

А если вам нужен активный текст в combobox'е, то надо написать например так:

 ini.WriteString('tools', 'Text', combobox1.Text); //так
 ini.WriteString('tools', 'Text', combobox1.Items[combobox1.ItemIndex]); //или так

[Jeni]

Странно, что ты везде пытаешься использовать WriteBool, хотя это применимо только к логическим переменным. Для строк используется WriteString, а для целых WriteInteger

[beemoto]

всё получилось ток (забыл=)) терь чтение немогу произвести:

  form2.combobox1.ItemIndex := ini.Readstring('tools', 'Language', true);

true - чёт немогу понять на чё нада замнеить...

[Neeter]

Да... ItemIndex - это индекс, следовательно имеет тип integer или попросту целое.
Вы же читаете строку: ReadString, да причем в третьем параметре указываете булевское значение, а там надо писать значение по умолчанию:

form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', 1);

[beemoto]

вот так зделал:

  form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', ComboBox1.ItemIndex);
  form2.edit1.text := ini.Readstring('tools', 'Skin', edit1.Text);

но терь почемуто при запуске идет ощибка :
Acess violation at adress 004b5f55 in module и бла-бла-бла

в онкрите прописано:

  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', ComboBox1.ItemIndex);
  form2.edit1.text := ini.Readstring('tools', 'Skin', edit1.Text);
  ini.Free;

[Neeter]

Надо писать так:

  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', 0); //Нельзя так писать, как было раньше, т.к. третий параметр - это значение по умолчанию, а вы присваиваете ему значение из самого combobox'а
  form2.edit1.text := ini.Readstring('tools', 'Skin', ''); //тут тоже надо вводить значение по умолчанию, но если не знаете что вводить, то вводите просто пустую строку
  ini.Free;

[beemoto]

Neeter, всёравно ощибка выпалзает=(


----------------------->
я на второй странице

[Neeter]

А вы этот код случайно не при создании form1 пишете??
Если да, то переместите его в собитие формы onShow

[beemoto]

Neeter, да спасибо помогло,но:
значения каторые я изменил при запуске неизменяются=(
хотя в в самом ини всё есть
-------------------
и немоглибы раскзать в 2-уч словаах про onShow!?