Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.07.2014, 14:13   #1
Shouldercannon
Участник клуба Подтвердите свой е-майл
 
Аватар для Shouldercannon
 
Регистрация: 26.01.2008
Сообщений: 1,899
Сообщение Загрузить конфиг в INIFile из TStringList

Доброго времени суток!
Пытаюсь загрузить конфиг в INIFile из TStringList
Код:
var
  SL: TStringList;
  INIFile: TINIFile;
begin
  SL := TStringList.Create;
  SL.Add('[Main]');
  SL.Add('Description=Test');

  INIFile := TINIFile.Create(SL.Text);
  Label1.Caption := INIFile.ReadString('Main', 'Description', '');

  FreeAndNil(SL);
  FreeAndNil(INIFile);
end;
В итоге Label1 пустой. Может быть из-за того, что в INIFile попадает такое содержимое:
'[Main]'#$D#$A'Description=Test'#$D#$A
Shouldercannon вне форума Ответить с цитированием
Старый 24.07.2014, 14:17   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

Цитата:
TINIFile.Create(SL.Text);
Путь к файлу на диске а не абычто.
Человек_Борща вне форума Ответить с цитированием
Старый 24.07.2014, 14:20   #3
Shouldercannon
Участник клуба Подтвердите свой е-майл
 
Аватар для Shouldercannon
 
Регистрация: 26.01.2008
Сообщений: 1,899
По умолчанию

С файлом 100% работает. Неудачный был эксперимент с загрузкой конфига из чего-либо ещё
Shouldercannon вне форума Ответить с цитированием
Старый 24.07.2014, 14:24   #4
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

Цитата:
Shouldercannon
Доки читайте Там четко сказано что IniFile работает только с файлами.
Человек_Борща вне форума Ответить с цитированием
Старый 24.07.2014, 16:04   #5
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,762
По умолчанию

Сделай так и всё получится
Код:
var
  SL: TStringList;
  INIFile: TINIFile;
  f : string;
begin
  f := ExtractFilePath (ParamStr(0)) + 'Settings.ini';
  SL := TStringList.Create;
  SL.Add('[Main]');
  SL.Add('Description=Test');
  SL.SaveToFile(f);
  FreeAndNil(SL);

  INIFile := TINIFile.Create(f);
  Label1.Caption := INIFile.ReadString('Main', 'Description', '');
  FreeAndNil(INIFile);
end;
FaTaL вне форума Ответить с цитированием
Старый 25.07.2014, 22:08   #6
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,899
По умолчанию

Качайте гуглинг, господа
phomm вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Конфиг Apache Predator199 PHP 1 03.06.2012 21:37
inifile и БД nhr БД в Delphi 0 06.07.2011 20:58
stream inifile dmitriegorovih Общие вопросы Delphi 9 27.07.2010 23:14
Сохранение в iniFile-ах Altera Общие вопросы Delphi 6 31.08.2009 11:08
Программа которая загружает себя из файла, а потом создаёт конфиг Pirotexnik Общие вопросы Delphi 1 28.03.2009 22:02