Проблема с ini-файлом

← →
HepB (2004-03-10 19:33) [0]

Почему не создаётся ini файл???
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); Var ini:Tinifile; begin ini:=Tinifile.Create("cd.ini"); try ini.WriteInteger("Form","Top",form1.Top); ini.WriteInteger("Form","Left",form1.Left); ini.WriteString("Form","Caption",form1.Caption); finally ini.Free; end; end;

← →
panov © (2004-03-10 20:13) [1]

Почему думаешь, что не создается?
Ищи этот файл в системном каталоге, ведь ты не указал путь, где этот файл должен быть создан.

← →
Anatoly Podgoretsky © (2004-03-10 20:16) [2]

Какую ошибку выдает, наверно насчет прав, если так то не положено.

← →
Sphinx © (2004-03-10 21:14) [3]

> ini:=Tinifile.Create("cd.ini");

исправьте на
ini:=TIniFile.Create(GetCurrentDir+"\cd.ini");

← →
Германн © (2004-03-11 03:13) [4]

2 Sphinx © (10.03.04 21:14) [3]
Я бы не советовал для этих целей использовать "GetCurrentDir". Мало ли где "CurrentDir" может оказаться в процессе работы программы!
А ини-файл, имхо, следует хранить либо "по умолчанию" в WinDir, либо в каталоге программы.

← →
Александр1 © (2004-03-11 05:55) [5]

HepB - А где ты хотел его увидеть???
Ну вот например:
ini:=Tinifile.Create(ExtractFilePath(Application.ExeName)+"cd.ini"); - создаёт файл в каталоге, где сидит написанная программа!

ini.UpdateFile;

← →
HepB (2004-03-11 21:50) [7]

Всем огромное спасибо, я действительно его искал не там где он появлялся :-)

Проблема с ini-файлом Найти похожие ветки