Combobox itemindex

[Neeter]

Покажите весь ваш код.

А onShow событие происходит при показе формы, т.е. если вы свернули окно и снова развернули, то оно произойдет.
В onCreate нельзя писать, потому что вы там присваиваете значения form2, которая еще не успела создаться, поэтому и ошибка

[beemoto]

procedure TForm1.FormShow(Sender: TObject);
begin
  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', 0);
  form2.edit1.text := ini.Readstring('tools', 'Skin', '');
  ini.Free;
end;

вот всё без ощибок запускается, но в ини:

[tools]
Language=English
Skin=D:\NEW\delphi\Мои проэкты\в стадии разработки\HACKLine\skins\black

но нет ддействия((

[Neeter]

Да потому, что у вас Language=English а загружаете вы в ItemIndex, значит надо писать в ини-файле например Language=0, это индекс выбранного элемента в combobox'e.
Так как нумерация начинается с нуля, то вы должны знать, какой индекс какому языку соответствует.
Если первым в combobox'e стоит English, то индекс равен 0, если он стоит вторым, то 1. Понятно?
Следовательно писать в ини-файле надо так:

[tools]
Language=0 //Но только если в combobox'е English стоит на первом месте
Skin=D:\NEW\delphi\Мои проэкты\в стадии разработки\HACKLine\skins\black

[beemoto]

пробовал напямую изменить язык в самом ини файле но неичего непроисходит((

и как я понял здесь тоже проблема:

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

combobox1.text - мне нада заменить вроде на итеминдекс!?

[KORN]

ну так combobox1.text и будет выбранное значение

[beemoto]

вот болеее чуть поправил:

  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  ini.Writeinteger('tools', 'Language', ComboBox1.ItemIndex);
  ini.Writestring('tools', 'Skin', edit1.text);
  ini.Free;

в том то и дело записывает правильно но нечитает:

procedure TForm1.FormShow(Sender: TObject);
begin
  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  form2.combobox1.ItemIndex := ini.Readinteger('tools', 'Language', 0);
  form2.edit1.text := ini.Readstring('tools', 'Skin', '');
  ini.Free;
end;

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

[tools]
Language=1
Skin=D:\NEW\delphi\Мои проэкты\в стадии разработки\HACKLine\skins\black

тут всё верно

[Neeter]

Должно быть все верно...
Что написано в combobox'е (все свойство Items)?

[beemoto]

Russian
English

[Neeter]

Попробуйте сначала переместить в переменные в секцию public и при создании второй формы уже их читать:

//Первая форма
...
public
  SkinPath: string;
  LanguageIndex: integer;
...
procedure TForm1.FormShow(Sender: TObject);
begin
  ini:= TIniFile.Create(extractfilepath(paramstr(0))+'Preferences.ini');
  try
    LanguageIndex := ini.Readinteger('tools', 'Language', 0);
    SkinPath := ini.Readstring('tools', 'Skin', '');
  finally
    ini.Free;
  end;
end;
...
//Во второй форме
...
uses Form1;
...
procedure TForm.FormCreate(Sender: TObject)
begin
  Combobox1.ItemIndex := LanguageIndex;
  Edit1.Text := SkinPath;
end;
...

[beemoto]

на строчку SkinPath: string; ругается:

[Eror]=)(95): Field definition not allowed after methods or properties