Файл настроек программы

[KoBaL]

Здравствуйте, нужно создать Config-файл программы, но не через TIniFile


В .ini вот так:

[ini]

Ini=1


А мне нужно вот так:

Ini 1


Кто нибудь знает как это можно сделать?

[Аватар]

Почему бы не работать как с обычным текстовым файлом, пишешь что хочешь и читаешь как хочешь. Через тот же StringList например

[Ky3Heu,]

А чем тебе ini плох??? При работе с текстовым файлом через Stringlist тебе нужно будет разделять ключ и значение ключа, (отделять ini и 1), а это +1 дополнительная функция и лишняя переменная. Плюс можно потом запутаться какое значение к чему приводит, особенно если будет много настроек. А в .ini все гораздо проще будет. Ну если прям уж сильно хочешь вот тебе пример:
структура текстового файла

951 = 10010001

procedure TMainF.Execute;
var
  ExCode  :string; 
  Values  :TStringList;
  i: Integer;

 function ExtractValue(str :string) :string;
  var i :Integer;
  begin
    i := 1;
    while str[i] <> '=' do Inc(i);
    Delete(str, 1, i+1);
    Result := str;
  end;

begin
  Values  := TStringList.Create;
   Values.LoadFromFile(GetCurrentDir+'\codes.txt');

for i := 0 to Values.Count - 1 do 
ExCode := ExtractValue(Values[i]);
...
end;

А через ini пара строк кода всего.

[KoBaL]

Мне не надо:

ini = 1

Так я могу и через TiniFile

Мне надо так:

ini 1

[Человек_Борща]

Тоже самое, только ищем пробел. При условии, что переменные не будут содержать пробелов, а варианты значений будут в ковычках.

Можно хоть на ушах стоять, компилятор позволяет.

[KoBaL]

Мне нужно без ковычек

[Ky3Heu,]

Ну я же тебе написал примерный код программы. Разделитель можешь любой впихать. Просто функцию подправишь и все.

[evg_m]

При работе с текстовым файлом через Stringlist тебе нужно будет разделять ключ и значение ключа, (отделять ini и 1), а это +1 дополнительная функция и лишняя переменная

для этого в TStringList есть

Values['ключ']:='значение';

и еще несколько свойств и методов.