| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

проблема с подключением к БД IB [D6, FB 1.0]

Страницы:   < 1 2 >

manevil ©   (2006-03-31 09:51:00) 

Собственно такая проблема:
Пытаюсь подключиться к БД вот так:
procedure TForm1.FormCreate(Sender: TObject);
var Ini:TiniFile;
begin
 Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
 IBDatabase1.DatabaseName:=(Ini.ReadString('options','DBPath',''));
 //IBDatabase1.Open;
 if IBDatabase1.Connected then
  begin
  Ini.free;
  IBDatabase1.Open;
  IBDatabase1.Connected:=true;
 end
else
 begin
  showmessage('База данных не найдена!');
  Application.CreateForm(TfrAddIBServer, frAddIBServer);
 {здесь вызывается форма, в которой юзер может выбрать путь к базе}
  frAddIBServer.Show;
 end;
end;
При этом получаю такую ошибку, если в .ini не прописан правильный путь: ...exception class EIBClientError 'Cannot perform operation -- DB is currently open'

---

Сергей М.   (2006-03-31 10:04:00) [21]

Для начала в дизайн-тайм в Инспекторе Объектов установи св-во IBDatabase1.Connected = False

---

manevil   (2006-03-31 09:53:00) [22]

помогите, плиз!

---

Страницы:   < 1 2 >

Наверх