Вниз
Скачать: CL | DM;

Какой модуль использовать?   Найти похожие ветки 

 
RomanH ©   (2006-05-04 14:10) [0]

Здраствуйте мастера.
Имеется ini файл где прописан путь к БД
[Path]
PathToDB=с:\DB\IB.gdb
В приложений когда создается форма в событии OnCreate
хочу сделать, чтобы IBDataBase.DataBaseName:=PathToDB,
полученная строка от ini файла прописалась как путь к БД, чтобы достич универсальности.
Но я не знаю какой модуль использовать, подскажите пожайлусто


 
Val ©   (2006-05-04 14:12) [1]

см. help TIniFile


 
RomanH ©   (2006-05-04 14:30) [2]

С ini файла я считываю путь
procedure TMainForm.FormCreate(Sender: TObject);
var loadini:TIniFile;
   PathToDataBase:string;
begin
      loadini:=TIniFile.Create(GetCurrentdir+"\load.ini");
      PathToDataBase:=LoadIni.ReadString("Path","PathToDB","");
      loadini.Free;
      dm1.IBDatabase1.DatabaseName:=PathToDataBase;

end;

Компилятор пишет ошибку связанную с аддресами на строке
dm1.IBDatabase1.DatabaseName:=PathToDataBase;


 
Val ©   (2006-05-04 14:40) [3]

возможно, нет еще dm1.IBDatabase1 на этот момент.


 
Johnmen ©   (2006-05-04 14:44) [4]

да, и кстати, GetCurrentdir неверно указывать, ибо можно вообще не найти файл...
надо, например, Application.ExeName


 
RomanH ©   (2006-05-04 14:53) [5]


> Val ©

Да Вы были правы: сначала создавалась форма а затем модуль данных.Спасибо за помощь.

> Johnmen ©  

А Ваш советы я всегда внимательно читаю, почитаю в helpe про Application.ExeName.


 
RomanH ©   (2006-05-04 15:01) [6]


> Johnmen ©

Да как Вы посоветовали, так я и сделал
loadini:=TIniFile.Create(ExtractFilePath(Application.ExeName)+"\load.ini");
Все таки очень хорошо когда мастера помогают и по теме и не по теме.
Спасибо.


 
Val ©   (2006-05-04 15:19) [7]

как вариант :)
TIniFile.Create(IncludeTrailingPathDelimiter(ExtractFileDir(ParamStr(0)))+"load.ini")


 
Anatoly Podgoretsky ©   (2006-05-04 15:22) [8]

RomanH ©   (04.05.06 15:01) [6]
У тебя должна быть ошибка времени выполнения.



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

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



Память: 0.46 MB
Время: 0.024 c
15-1149432235
Rsegg
2006-06-04 18:43
2006.07.02
Просканировать процесс


4-1143625032
Darkwin
2006-03-29 13:37
2006.07.02
Работа с портами


15-1149340797
Новичоккк
2006-06-03 17:19
2006.07.02
Реализация BlowFish для Delphi


4-1143057564
microcomp2005
2006-03-22 22:59
2006.07.02
Вопрос к знатокам железа по COM портам.


2-1150023154
Firefly
2006-06-11 14:52
2006.07.02
ASP.Net




   Наверх