Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.17;
Скачать: CL | DM;

Вниз

Ini files   Найти похожие ветки 

 
TrollXP ©   (2003-11-05 18:29) [0]

Привет, народ! Объясните, пожалуйста, как работать с ini файлами. Спасибо.


 
Владислав ©   (2003-11-05 18:32) [1]

А книги и хелп накой?!


 
Zew ©   (2003-11-05 18:35) [2]

Что то типо такого
var
IniFile: TIniFile;
IniPortItem: integer;
IniRTSChecked: boolean;
const
//значения по умолчанию
DefPortItem = 1;
DefRTSChecked = false;

procedure ReadIni;
var
IniPath: string;
FileName: string;
begin
GetDir(0,IniPath);
FileName:=IniPath+"\muk.ini";
IniFile:=TIniFile.Create(FileName);
IniPortItem:=IniFile.ReadInteger("Port","Number",DefPortItem);
IniRTSChecked:=IniFile.ReadBool("Port","RTS/CTS",DefRTSChecked);
IniFile.Free;
end;

procedure SaveIni;
var
IniPath: string;
FileName: string;
begin
GetDir(0,IniPath);
FileName:=IniPath+"\muk.ini";
IniFile:=TIniFile.Create(FileName);
IniFile.WriteInteger("Port","Number",IniPortItem);
IniFile.WriteBool("Port","RTS/CTS",IniRTSChecked);
IniFile.Free;
end;


 
Zacho ©   (2003-11-05 18:35) [3]

F1 - TIniFile
Там и примеры есть. А если что непонятно - спрашывай конкретно, что именно.


 
P0tia ©   (2003-11-05 18:35) [4]

procedure TForm1.FormDestroy(Sender: TObject);
var Ini: Tinifile; //необходимо создать объект, чтоб потом с ним работать
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+"MyIni.ini"); //создали файл в директории программы
Ini.WriteInteger("Size","Width",form1.width);
Ini.WriteInteger("Size","Height",form1.height);
Ini.WriteInteger("Position","X",form1.left);
Ini.WriteInteger("Position","Y",form1.top);
Ini.Free;
end;

А так вспоминать

procedure TForm1.FormCreate(Sender: TObject);
var Ini: Tinifile;
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+"MyIni.ini"); //открываем файл
Form1.Width:=Ini.ReadInteger("Size","Width",100);
//последнее значение (100) это значение по умолчанию (default)
Form1.Height:=Ini.ReadInteger("Size","Height",100);
Form1.Left:=Ini.ReadInteger("Position","X",10);
Form1.Top:=Ini.WriteInteger("Position","Y",10);
Ini.Free;
end;


 
TrollXP ©   (2003-11-05 18:47) [5]

В принципе, с этим понятно. Спасибо. Но вот меня интересует, как в оболочках ауторана из ini файла читается, допустим, дескриптор программы, ее путь и т.п.


 
Владислав ©   (2003-11-05 18:54) [6]

Ну а почему бы их точно также не прочитать?


 
TUser ©   (2003-11-05 18:55) [7]

В корне любого диска, способного к ауторану пишется файл autorun.ini. А в нем [Open] и в опене open=твойПрограмм.EXE. Точнее - посмотри на любом авторанящемся диске.


 
TrollXP ©   (2003-11-05 18:59) [8]

2TUser
Ты меня не понял.
2Владислав
Ну, допустм
[PROGRAM]
TITLE = Такая-то
INSTALL = Такой-то файл
PATH = -//-
DESCRIPTION = -//-
И таких несколько. И как для определённой прогр. прочитать свое?


 
Плохиш_   (2003-11-05 19:05) [9]

[PROGRAM1]
[PROGRAM2]...

Когда думать-то начнёшь?


 
TrollXP ©   (2003-11-05 19:07) [10]

Утром :)



Страницы: 1 вся ветка

Текущий архив: 2003.11.17;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.024 c
3-56473
СержК
2003-10-30 08:19
2003.11.17
Не могу законнектиться к БД


1-56730
BlackTiger
2003-11-02 16:47
2003.11.17
Почему RichEdit такой дурной. Или у меня что...


8-56770
SergeSV
2003-07-19 17:46
2003.11.17
360-ти градусная фотография


7-56943
Любитель
2003-09-09 09:01
2003.11.17
Господа как программно изменить время двойного клика


3-56484
dummt
2003-10-29 10:29
2003.11.17
Обновление query после изменения данных