туплю с INI

← →
delphi_ © (2007-04-08 15:45) [0]

procedure TForm1.Button2Click(Sender: TObject); var Version:string; IniFile:TIniFile; begin inifile:=TiniFile.Create(extractfilepath(Application.ExeName)+"ini.ini"); TRY Version:=IniFile.ReadString("LALA", "version", "gg"); label1.caption:=version; finally IniFile.Free;
сам ини файл

[LALA] version=17777
ни как не могу понять почему на лейбле появляеться gg,а не 17777 ?и ваще вредно кодить при температуре =\

← →
Anatoly Podgoretsky © (2007-04-08 15:48) [1]

> delphi_ (08.04.2007 15:45:00) [0]

Нет такого ИНИ файла

← →
delphi_ © (2007-04-08 16:42) [2]

всмысле нету если он в директории проги лежит?

← →
_Аноним (2007-04-08 16:50) [3]

Включи "Use debug"s DCU" и оттрасирруй в том числе и код VCL.
сразу поймешь, в чем дело

← →
delphi_ © (2007-04-08 18:38) [4]

попробовал сделать так-
path:=extractfilepath(Application.ExeName)+"ini.ini";
и вывел на лейбл.путь правильный.что всетаки не так?

← →
sniknik © (2007-04-08 19:01) [5]

> что всетаки не так?
нет такого файла... а есть например чтото вроде "ini.ini.txt", при запрете показа зарезервированных расширений.

← →
Loginov Dmitry © (2007-04-08 19:05) [6]

Варианта только 2 может быть:
- нет файла ini.ini в папке с данной программой
- в файле остутствует запись
[LALA]
version=17777

хотя, видимо у тебя третий случай, т.н. "клинический"

Попробуй убрать значение по умолчанию из "Version:=IniFile.ReadString("LALA", "version", "gg");"

Попробуй так:
extractfilepath(Application.ExeName)+"\ini.ini"

> Darvin © (09.04.07 13:56) [8]
>
> Попробуй так:
> extractfilepath(Application.ExeName)+"\ini.ini"
>

Сам проверил, прежде чем постить?

туплю с INI Найти похожие ветки