Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Вниз

База данных + Ini файл. 


Malyatko   (2002-01-14 08:09) [0]

Доброе утро Господа! Появилась проблема с которой не могу справится:(.Есть InterBase"овская база данных путь к которой прописан в *.ini файле. При написании програмы все компоненты для работы с базой данных включая IBDatabase, IBTransacation и т.д поместил в DataModule.Из главной формы получил доступ к содержимому модуля данных. В самой форме пишу:
procedure TForm1.FormCreate(Sender: TObject);
var dn :string;
begin
Dmod.IBDatabase1.Connected:=true;
IniF:=Tinifile.Create(".\Lib2.ini");
Dn:=IniF.ReadString("IB","path",paths);
inif.Free;
Dmod.IBDatabase1.DatabaseName:=dn;
Dmod.IBDatabase1.Connected:=true;
Dmod.IBTransaction1.Active:=true;
end;
После запуска возникает ошибка: Access violation as address ... in module ... Read of address FFF... :( После чего сама программ продолжает работать нормально. До этого писал проги без DataModul и алгоритм чтения пути из Ini файла работал
нормально.
Сталкивался ли кто-то с такой проблемой и не подскажите как ее решить?
Буду очень признателен.



panov   (2002-01-14 08:12) [1]

Используй приведенный код ля вызова в OnCreate для TDataModule.
В момент создания Form1 TDataModule со своими компонентами еще не существует. Отсюда и Exception.



Ptiza   (2002-01-14 10:47) [2]

Panov абсолютно прав , но если не хочешь менять кода , то
необходимо чтобы в файле проекта *.dpr первым создавался
Модуль данных Application.CreateForm(TDateModule1,DateModule1),
а не Application.CreateForm(TForm1,Form1)



psvital   (2002-01-15 08:21) [3]

to Ptiza

Или еще вместо OnCreate можно использовать OnShow..



Belov   (2002-01-15 11:22) [4]

Project - Options - указываешь что DataModule1 создается первым,
затем Form1




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.016 c
1-32194           daosv                 2002-01-26 13:34  2002.02.11  
Как узнать на какие экранные координаты переместился левый и правый верхний угол формы при перетаскивании самой формы?


1-32269           Ig                    2002-01-25 22:25  2002.02.11  
Как создать кнопку на основе картинки?


3-32133           Oleg Fomicheff        2002-01-14 20:59  2002.02.11  
Какая размерность у DBListBox?


1-32212           Сержик                2002-01-25 09:26  2002.02.11  
Как сделать чтобы


3-32128           Олег Лаукарт          2002-01-15 12:35  2002.02.11  
Помогите с запросом