Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.11.17;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.011 c
14-56810
Карелин Артем
2003-10-24 14:47
2003.11.17
Посоветуйте систему контроля версий. Дельфи.


14-56908
esu
2003-10-25 07:09
2003.11.17
Буква е (с двумя точками сверху)


3-56432
HydraMarat
2003-10-29 01:05
2003.11.17
Почему не работяют события (IBEventAlerter)?


1-56590
Andrew287
2003-11-07 13:23
2003.11.17
TDBRichEdit и табуляция


1-56653
Niobe
2003-11-05 12:15
2003.11.17
Запретить изменение размеров формы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский