![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#2
|
|||
|
|||
|
сохранять сделал....осталось считать....
Код:
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;Последний раз редактировалось Dellink, 26.10.2010 в 16:00. |