Показать сообщение отдельно
  #2  
Старый 26.10.2010, 15:43
Dellink Dellink вне форума
Прохожий
 
Регистрация: 26.10.2010
Сообщения: 5
Репутация: 10
По умолчанию

сохранять сделал....осталось считать....
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
   IniFile.WriteString('FORM1','ComboBox1',ComboBox1.Items.Text);
   Form1.Close;
end;

считывать никак не получается....при запуске в ComboBox только 1 строчка((

Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
   IniFile:=TIniFile.Create('C:\My.ini');
   ComboBox1.Items.Text := IniFile.ReadString('FORM1','ComboBox1.Items.Text',ComboBox1.Items.Text);
end;
Ответить с цитированием