Показать сообщение отдельно
  #10  
Старый 01.07.2022, 18:11
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,004
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Да, секция читается в формате Key=Value.
Т.е. надо обращаться к считанным данным через соотв. св-во TStringList.
Если правильно помню, то через sl.Values[KeyName]

Как то так:
Код:
var
  sl : TStringList;
  ini : TIniFile;
  i : Integer;
begin
  ini := TIniFile.Create('...');
  sl := TStringList.Create;
  ini.ReadSectionValues('05.05.2022',sl);
  For I := 0 To sl.Count-1 Do
  begin
    ShowMessage(Format('Имя ключа = %s, значение ключа  = %s',[sl.KeyNames[i],sl.Values[sl.KeyNames[i]]]));
  end;
  ini.free;
  sl.free;
end;
Ответить с цитированием