Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.02;
Скачать: 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 вся ветка

Текущий архив: 2006.07.02;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.04 c
15-1149433581
Express
2006-06-04 19:06
2006.07.02
Зачем нужна библиотека - Qtintf70.dll???


2-1150108493
Старый пляж
2006-06-12 14:34
2006.07.02
Помогите не знаю как сделать!


3-1146664555
Александр1
2006-05-03 17:55
2006.07.02
Соединение с табличкой DBF


15-1149595640
Marser
2006-06-06 16:07
2006.07.02
История повторяется...


2-1150099302
He3Hauka
2006-06-12 12:01
2006.07.02
OpenGl