Загрузка в ListView из ini файла

Posted by Chas under Delphi

Как Из Ini считать параметр и значение и загрузить их в 1 и 2 столбик ListView

procedure TForm1.FormActivate(Sender: TObject);

const

  SectionName = 'Options';

var

  Keys: TStringList;

  Inifile: TMemIniFile;

  I: Integer;

begin

  ListView1.ViewStyle := vsReport;

  ListView1.Columns.Add.Caption := 'Key';

  ListView1.Columns.Add.Caption := 'Value';

  Inifile := TMemIniFile.Create('1.ini');

  Keys := TStringList.Create;

  Inifile.ReadSection(SectionName, Keys);

  for I := 0 to Keys.Count - 1 do

    with ListView1.Items.Add do

    begin

      Caption := Keys[I];

      SubItems.Add(Inifile.ReadString(SectionName, Keys[I], ''));

    end;

  FreeAndNil(Keys);

  FreeAndNil(Inifile);

end;

На форме только листвью, и установлен обработчик OnActivate у формы, больше не надо ничего. Но Вы сами можете настроить колонки и т.п., тогда надо убрать из кода обращение к Columns
Ини-файл вида

[Options]

  MainFormOnTaskbar = True

  ApplicationForm = Form1

тема на форуме

Похожие статьи

• как можно выгрузить только одну колонку с ListView?
• Подсчитать количество секций в инифайле
• Получить из текста строки, и занести их в массив
• Задать HotKey в ListView на Delphi
• Сортировка в обе стороны в ListView
• HotKey в ListView через WinAPI
• Сортировка имен файлов в TStringList
• Удалить пустые строки из TStringList
• Как экспортировать таблицу DBGrid в txt файл?
• Случайная строка из текстового файла