Ini-Files

← →
Ig (2003-09-10 18:04) [0]

Ни кто не сталкивался с такой проблемой в ini файлах, я записываю так :

в ini файле
[form1]
Left = 377
Top = 223

в программе
ini:=Tinifile.Create("inifiles.ini");
form1.Left:=ini.ReadInteger("form1","left",100);
form1.Top:=ini.ReadInteger("form1","top",100);
ini.free;

но считывает почему то, значение по умолчанию, то есть - 100, может кто подскажет, что надо сделать :)

← →
jack128 © (2003-09-10 18:06) [1]

Не уверен, но может
ini:=Tinifile.Create(extractFilePath(ParamStr(0))+"inifiles.ini");

← →
Sandman25 © (2003-09-10 18:06) [2]

Возможно, надо сохранять регистр букв.
Left

← →
Ig (2003-09-10 18:12) [3]

>ini:=Tinifile.Create(extractFilePath(ParamStr(0))+"inifiles.ini");

Я так писал но Делфи почему то ругаться стала.

← →
ZEE © (2003-09-10 18:14) [4]

сначала
if fileexists(ExtractFilePath(ParamStr(0))+"inifiles.ini") then ...

← →
default © (2003-09-10 18:16) [5]

""inifiles.ini"" в текущем каталоге точно лежит?
а то если файла нет TIniFile.Create exception не генерит по-моему

← →
Arm79 © (2003-09-10 18:19) [6]

ExtractFilePath(ParamStr(0))+"\inifiles.ini" - или так

← →
ZEE © (2003-09-10 18:20) [7]

> <Ig> (10.09.03 18:12) [3]
> но Делфи почему то ругаться стала.
на что и как ругется?

← →
Ig (2003-09-10 18:21) [8]

Всем большое спасибо не работало потому, что писал :
ini:=Tinifile.Create(extractFilePath(ParamStr)+"inifiles.ini");
:)

← →
ZEE © (2003-09-10 18:22) [9]

>Arm79 © (10.09.03 18:19) [6]
>ExtractFilePath(ParamStr(0))+"\inifiles.ini" - или так

ExtractFilePath - возвращает путь, а не директорию (в отличие от ExtractFileDir) т.е. со "слэшем" в конце строки
Поэтому так получится двойной слэш

а всё потому что exception-а не генерится...
так бы сразу ошибку локализовал

> а всё потому что exception-а не генерится...
> так бы сразу ошибку локализовал

В этом как раз вся прелесть ини-файлов...

Дык,.... ini файл - пустой!

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