Работа с INI файлами

← →
Anton Lagutin (2003-06-22 01:45) [0]

Здраствуйте мастера. У меня такая проблема: Как мне сохранять, а потом загружать параметры из INI файла.

← →
Palladin (2003-06-22 01:56) [1]

TIniFile+F1

← →
INCOGNITO (2003-06-22 03:13) [2]

Я сними работаю, как собычными файлами. Атам всё просто:
AssignFile
Reset / Rewrite
Read / Readln / Write / Writeln
CloseFile

Может, это и не грамотно, но работает

← →
jack128 (2003-06-22 03:15) [3]

> INCOGNITO © (22.06.03 03:13

и какждый раз парсеришь строку?
мой тебе совет
> Palladin © (22.06.03 01:56)

← →
INCOGNITO (2003-06-22 04:48) [4]

Попробую :)

← →
Scorpx (2003-06-22 12:11) [5]

Часть первая...
Создаем новый проект, в форму Form1 помещаем компоненты Edit, ComboBox, два компонента CheckBox, две кнопки BitBtn.
Для компонента ComboBox1 изменяем свойство Style в csDropDownList и редактируем свойство Items, занося туда несколько произвольных строк. Дальше для BitBtn1 свойство Caption изменяем на Сохранить, а для кнопки BitBtn2 - Восстановить.
В процедуре нажатия на кнопку "Сохранить" аналогично закрытию окна команда WriteParams, для кнопки "Восстановить" - ReadParams.

← →
Scorpx (2003-06-22 12:32) [6]

Часть вторая...
uses
inifiles; // подключение модуля, позволяющего работать с ini файлами

type
procedure ReadParams; // процедура чтения параметров
procedure WriteParams; // процедура записи параметров

← →
Scorpx (2003-06-22 12:33) [7]

Часть третья...
implementation
{$R *.DFM}
procedure TForm1.ReadParams;
Var IniFile:TIniFile; // объявление переменной, через которую будут обрабатываться данные
begin
IniFile:=TIniFile.Create("project.ini"); // создаем переменную
Edit1.Text:=IniFile.ReadString("FORM1","Edit1Text",Edit1.Text); // текст в Edit1
ComboBox1.ItemIndex:=IniFile.ReadInteger("FORM1","ComboBox1ItemIndex",ComboBox1.ItemIndex); // выбранный пункт
CheckBox1.Checked:=IniFile.ReadBool("FORM1","CheckBox1Checked",CheckBox1.Checked); // состояние CheckBox1
CheckBox2.Checked:=IniFile.ReadBool("FORM1","CheckBox2Checked",CheckBox2.Checked); // состояние CheckBox2
IniFile.Free; // если сами создаем, то сами уничтожаем.
end;

← →
Scorpx (2003-06-22 12:33) [8]

Часть четвертая...
procedure TForm1.WriteParams;
Var IniFile:TIniFile;
begin
IniFile:=TIniFile.Create("project.ini");
IniFile.WriteString("FORM1","Edit1Text",Edit1.Text);
IniFile.WriteInteger("FORM1","ComboBox1ItemIndex",ComboBox1.ItemIndex);
IniFile.WriteBool("FORM1","CheckBox1Checked",CheckBox1.Checked);
IniFile.WriteBool("FORM1","CheckBox2Checked",CheckBox2.Checked);
IniFile.Free;
end;

← →
AbrosimovA (2003-06-23 09:39) [9]

> Palladin © (22.06.03 01:56)
> TIniFile+F1

Ты как всегда в своем репертуаре. В справке же нет никакого примера.

> Anton Lagutin (22.06.03 01:45)

Я уже где-то в форуме приводил функции для записи и чтения в ini-файл и как их вызывать. Поищи.

← →
Palladin (2003-06-23 09:43) [10]

мне не понятно твое высказывание

← →
Anatoly Podgoretsky (2003-06-23 09:56) [11]

AbrosimovA (23.06.03 09:39)
Это как нет, я не поленился посмотреть, по TIniFile есть, по крайней мере 4 комплексных примере. Как прикажешь понимать тебя Абдулла?

← →
AbrosimovA (2003-06-23 10:01) [12]

> Palladin © (23.06.03 09:43)
> мне не понятно твое высказывание

А тем, кто задает вопросы в форуме, будут понятны твои ответы
из разряда "Смотри справку". Людям нужны примеры, а не смотреть справки, в которых заведомо примера по данному вопросу нет.
Нужно уважать не только себя, но и тех, кто только начинает программировать. Всюду, где ты отвечаешь, сквозит презрение к тем, кого ты считаешь "ламерами" и "чайниками".

> Anton Lagutin (22.06.03 01:45)

Посмотри эту статью:
http://code-code.narod.ru/art/ini.html

← →
Palladin (2003-06-23 10:19) [13]

> AbrosimovA (23.06.03 10:01)

Это естественный отбор...
Лично я не понял его проблемы работы с ini файлами, может у него с головой она, а может и нет, вопрос задан некорректно, значит дам 0.6 что с головой...
После прочтения вопроса такое чувство возникает, что вот он сидел на стуле, сидел, мух ловил, и тут у него вдруг неожиданное возникла проблема "Как мне сохранять, а потом загружать параметры из INI файла.", как же ее решить? ну как, вот знакомый форум посоветовал, спроси там. О точно, спрошу ка я в форуме...

← →
Anatoly Podgoretsky (2003-06-23 10:26) [14]

AbrosimovA (23.06.03 10:01)
Опять продолжаешь преднамеренный обман, в справке есть комплексные примеры.
Похоже все таки твоя цель наезд.

← →
AbrosimovA (2003-06-23 10:38) [15]

> Anatoly Podgoretsky © (23.06.03 10:26)

Вот содержание моей справки и где же в ней примеры. A????

TIniFile

Hierarchy Properties Methods Using TIniFile See also
________________________________________________________________

TIniFile stores and retrieves application-specific information and settings from INI files.

Unit

IniFiles

Description

TIniFile enables handling the storage and retrieval of application-specific information and settings in a standard INI file. An INI file stores information in logical groupings, called “sections.” Within each section, actual data values are stored in named keys. Keys take the form:

<keyname>=<value>

A FileName is passed to the TIniFile constructor and identifies the INI file that the object accesses.

Note: On Linux, TIniFile is the same as TMemIniFile. This differs from the Windows product, in which TIniFile does not buffer writes in memory the way TMemIniFile does.

> Palladin © (23.06.03 10:19)

Смею предположить, что ты, когда был начинающим, то также сидел на стуле и ловил мух..... А сейчас ты "санитар леса".

← →
mrcat (2003-06-23 10:47) [16]

AbrosimovA (23.06.03 10:38)
>Вот содержание моей справки и где же в ней примеры. A????
>TIniFile
>Hierarchy Properties Methods Using TIniFile See also

Глубже поискать не судьба?

This example reads the Transfer section of the myapp.ini file into a memo and changes one of the strings in the INI file when Button1 is clicked. When Button2 is clicked, the myapp.ini file is restored to its initial state, using the values stored in the memo. Before you run this example, you must add the IniFiles unit to the uses clause of your unit. Warning: Do not click button2 before you have clicked button1! procedure TForm1.Button1Click(Sender: TObject); var MyIniFile: TIniFile; begin MyIniFile := TIniFile.Create("myapp.ini"); Memo1.Clear; MyIniFile.ReadSectionValues("Transfer", Memo1.Lines); if Memo1.Lines.Values["Title1"] <> "Picture Painter" then MyIniFile.WriteString("Transfer", "Title1", "Picture Painter"); MyIniFile.Free; end; procedure TForm1.Button2Click(Sender: TObject); var MyIniFile: TIniFile; begin MyIniFile := TIniFile.Create("myapp.ini"); { if the entry wasn’t there before, delete it now } if Memo1.Lines.Values["Title1"] = "" then MyIniFile.DeleteKey("Transfer", "Title1") { otherwise, restore the old value } else MyIniFile.WriteString("Transfer", "Title1", Memo1.Lines.Values["Title1"]); MyIniFile.Free; end;

← →
Anatoly Podgoretsky (2003-06-23 10:52) [17]

Если это заблуждение, то это не лучше, это будет говорить уже о твоем уровне, который в этом случае говорит об неумении пользоваться скажем для начала такой вещью как справочная система, навигация по ней, например выбор между пунктами меню свойства, методы и события и далее опять Example-
Но твой интеллектуальный и профессиональный уровень это не основание, чтобы на основе его делать наезды на участиников форума и многоуважаемую фирму Борланд.

← →
Palladin (2003-06-23 10:53) [18]

Когда я был начинающим, у меня не было интернета, у меня был Поиск2 в школе и две книжки GWBasic и Turbo Pascal 3, соотвествоенно и ПО такое же... хотя я конечно не такой "матерый" как Юрий Зотов, но мне этого хватило... учителя у меня не было... у меня был наставник который подсказывал методологию изучения и развития, но не саму информацию, к счастью на практике он мне ничем не помогал... ни пример показать ни синтаксис описать... иначе бы я заразился от него его логикой и был бы ею же и ограничен... мудрый он был, то есть и сейчас есть.

А в этом случае, ну разве не видно, что человеку бы алгоритмы пописать простейшие, решения квадратных уравнений, и пр. а потом уже что то более серьезное писать, но он не будет... зачем? зачем ему это надо?
Кинь я ему сюда пример, как Sorpx, он бы его скопировал, модифицировал и все, но я его в справку отправил, что бы он хоть немного поковырял, там справка, извините меня, и 10 классу понятна...

Работа с INI файлами Найти похожие ветки