Заполнение ListView из ini

@lordik55 · Регистрация: 28.07.2012

Всем привет. Помогите разрешить проблемку. Небольшую. Идея следующая: на форме есть пустой ListView. В нем 3 столбца уже созданы.
Нужно сделать следующее: заполнить из *.ini-файла при загрузке формы. Почти получается, а точнее дело так либо вносится только первая запись, либо программа входит в бесконечный цикл и не запускается.

Delphi

procedure TForm1.FormCreate(Sender: TObject);
var listItem : TListItem;
    s : string;
    i: Integer;
begin
   pathINI := ExtractFilePath(Application.ExeName) + '\settings.ini';
   sIniFile := TIniFile.Create(pathINI);
   
   /* тут ещё всякий код */
 
   StatusBar1.Panels[1].Text := '';
   //  Чтение из ini-файла
   while (true) do begin
   s := sIniFile.ReadString('ListView1', 'Name', '');
 
   listItem := ListView1.Items.Add;
   listItem.Caption := s;
   listItem.SubItems.Add(sIniFile.ReadString('ListView1', 'Version', ''));
   listItem.SubItems.Add(sIniFile.ReadString('ListView1', 'Status', ''));
 
   Memo2.Lines.Text := sIniFile.ReadString('ListView1', 'Hint', '');
   end;
   sIniFile.Free;
   //
end;

@krapotkin · 03.08.2017, 20:38

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

while (true) do begin

в переводе на русский
"без вариантов остановиться, погнали"

вы создаете +БЕСКОНЕЧНОСТЬ итемов, но читаете их из одной и той переменной
программе будет скучно...

@lordik55 · 03.08.2017, 20:43 **[ТС]**

Трабл понял

Но как исправить?
Структура ini-файла следующая:

CSS

[ListView1]
ID=
Name=
Version=
Status=
Hint=
Path=

ID - везде уникальный. С помощью него это можно отследить как-то эту ситуацию?

@krapotkin · 03.08.2017, 20:50

ну вообще то поиск в ini идет по секция,ключ
если у вас секции названы одинаково, как вы выберете нужную??
кто вам мешает написать[ListView1.1]
ID=1
[ListView1.100]
ID=100

@lordik55 · 04.08.2017, 07:05 **[ТС]**

Хмм. Не могу додумать, как так можно сделать. У меня простой ещё у каждого Item'а своя картинка из ImageList присваивается. Надо чтобы у каждого в соответствии своя стояла.

@krapotkin · 04.08.2017, 08:27

вообще не понял вопроса
как сделать секцию[ListView1.100] ?
вы же руками файл пишете. так и пишите на здоровье

можно читать все секции по очереди и выбирать из них те, что начинаются с "ListView1."
читайте же оф. документацию или смотрите исходники в поисках того что вам подходит
TIniFile довольно простой класс...

получить список секций в виде StringList
http://docwiki.embarcadero.com... adSections
потом по очереди считать одну секцию целиком в другой стринглист
http://docwiki.embarcadero.com... tionValues

@lordik55 · 04.08.2017, 10:26 **[ТС]**

Нет, я сделал теперь так, что заполняется ListView из ini-файла. Там 3 записи и сюда тоже все 3 добавились успешно. Но картинка (пиктограмма из ImageList) у всех Item'ов одинаковая, как у первого элемента.
Как сделать, чтобы у каждого Item'а был соответствующий ImageIndex для ImageList'а?

@qwertehok · 04.08.2017, 10:38

увеличить ImageIndex?

@krapotkin · 04.08.2017, 10:52

а что ImageIndex никак в INI не заходит?

@krapotkin 5498 / 4293 / 1379 Регистрация: 14.04.2014 Сообщений: 19,285 Записей в блоге: 19
	03.08.2017, 20:38	2
	Сообщение от lordik55 while (true) do begin в переводе на русский "без вариантов остановиться, погнали" вы создаете +БЕСКОНЕЧНОСТЬ итемов, но читаете их из одной и той переменной программе будет скучно... 0

@krapotkin 5498 / 4293 / 1379 Регистрация: 14.04.2014 Сообщений: 19,285 Записей в блоге: 19
	03.08.2017, 20:50	4
	ну вообще то поиск в ini идет по секция,ключ если у вас секции названы одинаково, как вы выберете нужную?? кто вам мешает написать[ListView1.1] ID=1 [ListView1.100] ID=100 0

@lordik55 3 / 3 / 3 Регистрация: 28.07.2012 Сообщений: 185
	04.08.2017, 07:05 [ТС]	5
	Хмм. Не могу додумать, как так можно сделать. У меня простой ещё у каждого Item'а своя картинка из ImageList присваивается. Надо чтобы у каждого в соответствии своя стояла. 0

@krapotkin 5498 / 4293 / 1379 Регистрация: 14.04.2014 Сообщений: 19,285 Записей в блоге: 19
	04.08.2017, 08:27	6
	вообще не понял вопроса как сделать секцию[ListView1.100] ? вы же руками файл пишете. так и пишите на здоровье можно читать все секции по очереди и выбирать из них те, что начинаются с "ListView1." читайте же оф. документацию или смотрите исходники в поисках того что вам подходит TIniFile довольно простой класс... получить список секций в виде StringList http://docwiki.embarcadero.com... adSections потом по очереди считать одну секцию целиком в другой стринглист http://docwiki.embarcadero.com... tionValues 0

@lordik55 3 / 3 / 3 Регистрация: 28.07.2012 Сообщений: 185
	04.08.2017, 10:26 [ТС]	7
	Нет, я сделал теперь так, что заполняется ListView из ini-файла. Там 3 записи и сюда тоже все 3 добавились успешно. Но картинка (пиктограмма из ImageList) у всех Item'ов одинаковая, как у первого элемента. Как сделать, чтобы у каждого Item'а был соответствующий ImageIndex для ImageList'а? 0

@qwertehok 4865 / 4009 / 1007 Регистрация: 29.08.2013 Сообщений: 25,603 Записей в блоге: 3
	04.08.2017, 10:38	8
	увеличить ImageIndex? 0

@krapotkin 5498 / 4293 / 1379 Регистрация: 14.04.2014 Сообщений: 19,285 Записей в блоге: 19
	04.08.2017, 10:52	9
	а что ImageIndex никак в INI не заходит? 0

Опции темы