Скачать: CL | DM;

Запись в ini файл   Найти похожие ветки 

← →
UMU ©   (2007-06-04 16:32) [0]

Добрый день.

На форме есть Edit и OpenDialog. После выбора файла в OpenDialog, путь к нему помещается в Edit. При нажатии на кнопку, содержание Edit должно записываться в ini файл.

Если записать содержание Edit в ini до открытия диалога, то работает нормально, но после открытия диалога, запись не происходит.

//Открытие диалога
 if OpenDlg.Execute then
    Edit.Text:=OpenDlg.FileName
 OpenDlg.Free;
//***

//Запись в ini файл
procedure TForm.WriteIni(ASection, AString, AValue : String);
var
 sIniFile: TIniFile;
 sPath: String[60];
Begin
 GetDir(0,sPath);
 sIniFile := TIniFile.Create(sPath + "\Settings.INI");
 sIniFile.WriteString(ASection, AString, AValue);
 sIniFile.Free;
End;
//***

Подскажите, в чем дело?

---

← →
clickmaker ©   (2007-06-04 16:35) [1]

OpenDialog сменил текущую папку, которая возвращается GetDir(0,sPath);?
Почему бы полный путь не указывать в TIniFile.Create?

---

← →
Loginov Dmitry ©   (2007-06-04 16:37) [2]

> GetDir(0,sPath);
> sIniFile := TIniFile.Create(sPath + "\Settings.INI");


что за шаманство?

---

← →
Loginov Dmitry ©   (2007-06-04 16:41) [3]

Так попробуй:
sPath := ExtractFilePath(ParamStr(0)) + "Settings.INI";

---

← →
UMU ©   (2007-06-04 16:45) [4]

Большое спасибо

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c