Главная страница
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.025 c
3-56439
Tumcoat
2003-10-27 07:15
2003.11.17
Проблема с BOF и EOF


14-56876
Rouse_
2003-10-25 18:42
2003.11.17
Антология Мастера Улыбаются.


9-56427
Ace Cooper
2003-05-09 00:29
2003.11.17
Использование анимированых персонажей в играх без DelphiX и т.п.


14-56855
Neox
2003-10-25 21:21
2003.11.17
Router


14-56913
Nazarik
2003-10-24 19:56
2003.11.17
Зима пришла!