Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Paradox

arous © (2003-07-28 00:59:00)

Как узнать, поставлены дрова на БД Paradox?

Dred2k (2003-07-29 09:26:00) [1]

Unit

DBTables

var Session: TSession;

Description

Session is responsible for maintaining all of the database components used by an application. It is created automatically as part of an application"s initialization and destroyed as part of the application"s termination. The Session variable must remain active at all times; it can not be destroyed and recreated.

(смотрим DbTables.pas)
TSession.Open -> TSession.SetActive(True) -> TSession.StartSession(Value) -> TSession.InitializeBDE -> DbiInit(@Env)

Этот способ с точки зрения VCL предпочтительнее и корректнее.
Насчет ключей реестра - способ неоднозначный. Ключ будет на месте, а пары DLL не хватает, к примеру (тем более, учитывая то, как некоторые "ставят" BDE).
Явный вызов Session.Open перед работой с базой снимет все неясности (тем более, что она - var Session - все равно откроется потом, хоть и не явно).

Aleksandr (2003-07-29 03:48:00) [2]

Согласен. Не предложил третьего варианта, выбирая между двумя. Хотя у меня dbiInit(0) тоже дает аналогичную реакцию незакрытым сессиям.

Anatoly Podgoretsky (2003-07-28 19:54:00) [3]
Искать ключ совсем не надежно, ключ может быть, а БДЕ нет. Правильно только обращение к функциям БДЕ, из них особо правильно обращение к функцие init

uses bde; ... try dbiInit(nil); except ( "BDE не установлено!")
Искать ключ совсем не надежно, ключ может быть, а БДЕ нет. Правильно только обращение к функциям БДЕ, из них особо правильно обращение к функцие init uses bde; ... try dbiInit(nil); except showmessage("BDE не установлено!") end; Alex Gorkusha http://podgoretsky.com/ftp/Language/nps/ru.delphi.db.html#N22

Aleksandr (2003-07-28 19:39:00) [4]

2 Dred2k :
Не факт. Эксепшн может выпасть и при просто повисшей сессии (например, в дизайн-тайме открыли и не закрыли перед запуском).
Надежнее поискать ключ в реестре в HKEY_LOCAL_MACHINE.

Dred2k (2003-07-28 15:08:00) [5]

> arous © (28.07.03 14:12)> А тогда как узнать стоит ли этот BDE?

Перед всеми операциями с базой
try
Session.Open;
except
// ... BDE не стоит
end;

Anatoly Podgoretsky (2003-07-28 14:17:00) [6]

Зачем тебе?
Ну запусти Database Desktop и сразу узнаещь. Или запусти любую программу которая будет работать с базой.

arous (2003-07-28 14:12:00) [7]

А тогда как узнать стоит ли этот BDE?

Wowa-K (2003-07-28 07:15:00) [8]

Узнай лучше стоит ли BDE

Наверх

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