VPF::Инициализация BDE в программах..

Diver

Дата 27.2.2004, 19:39 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 27.2.2004

Репутация: нет
Всего: нет

Столкнулся с такой проблемой...
При переносе программы на другой компьютер она сообщает об ошибке
инициализации Borland Database Engine.

Файлы DLL для BDE в каталог с программой я положил, но проблема
осталась. Может не все файлы перенес или их специально надо инициализировать?

Подскажите как быть. Заранее спасибо.

December

Дата 27.2.2004, 22:41 (ссылка)

(нет голосов)

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57

Diver Надо БДЕ инсталлировать. Посмотри по форуму, эта тема обсуждалась в течение последней недели. Вкратце - InstallShield, а также читать BDEDeploy.txt

--------------------

Для друзей с винграда - скидки на разработку сайтов

dm9

Дата 27.2.2004, 22:49 (ссылка)

(нет голосов)

Загрузка ...

Дмитрий Копытин

Профиль
Группа: Vingrad developer
Сообщений: 3876
Регистрация: 22.7.2002
Где: Москва

Репутация: 6
Всего: 137

December, мне говорили, что BDE инсталлировать не обязательно. Достаточно перенести какие-то 4 dll-ки. Вот какие - не знаю.

December

Дата 28.2.2004, 15:57 (ссылка)

(нет голосов)

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57

dm9 Ну, смотря что считать инсталляцией. Необходимо принести несколько dll-ей (и не только), а также прописать путь к ним в реестре. Если хочешь, могу тебе кинуть модуль BDE32 (сэнкс Виту за линк), в котором показано, как нужно ручками инсталлировать BDE.

--------------------

Для друзей с винграда - скидки на разработку сайтов

Maverick

Дата 28.2.2004, 16:11 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1307
Регистрация: 22.9.2003
Где: Odessa, Ukraine

Репутация: 2
Всего: 10

А я делаю так.... найди в инсталле дельфи файл.... bdeinst.cab...
разархивируй.... там будет bdeinst.dll.... кидаешь сей файл в system32...
пишешь команду regsvr32 bdeinst.dll.... дальше все станет ясно....

все.... bde на компе установлен....

--------------------

Diver

Дата 28.2.2004, 19:25 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 27.2.2004

Репутация: нет
Всего: нет

Если я правильно усек то путь в реестре...
Раздел HKEY_LOCAL_MACHINE\Software\Borland\Database engine —
параметр DLLPATH должен содержать путь к DLL-файлам BDE;

Я прав?
А упоминавшиеся 4 dll файла:
IDAPI32.DLL, IDPDX32.DLL , IDR20009.DLL, Bantam.dll
(может ещё есть

говорят про USA.BLL и CHARSET.BLL, но я их не нашел)

На моём компе прога работает, а вот у юзера (тот бедняга даже BDE 5.01
ставил) она не идет.

December, что за модуль такой BDE32? Хочу!!!

December

Дата 28.2.2004, 19:25 (ссылка)

(нет голосов)

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57

regsvr32 /s bdeinst.dll
по-моему... В текстовике всё описано.

--------------------

Для друзей с винграда - скидки на разработку сайтов

Diver

Дата 28.2.2004, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 27.2.2004

Репутация: нет
Всего: нет

Нашел BdeInst.DLL, BDE ставится, но есть одна проблема,
файл тянет почти на 4Mb. Не каждый пользователь захочет
качать из Inet'а 4-х метровый архив (а ёще и программа)

В общем печальная история.

Нужен минимальный список необходимых файлов.
(кроме тех четырёх...)

И ещё вопрос (наверное странный, но на форуме я первый день),
от чего зависит количество сообщений и рейтинг участников?

<Spawn>

Дата 28.2.2004, 20:57 (ссылка)

(нет голосов)

Загрузка ...

Око кары:)

Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64

Цитата

И ещё вопрос (наверное странный, но на форуме я первый день),
от чего зависит количество сообщений и рейтинг участников?

1 пост = 1 сообщение(кроме раздела флейм)
рейтинг выставляют участники имеющие более 100 постов(вроде так), его можно понижать\повышать на свое усмотрение.

Это сообщение отредактировал(а) <Spawn> - 28.2.2004, 20:58

--------------------

"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.

Diver

Дата 29.2.2004, 16:54 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 27.2.2004

Репутация: нет
Всего: нет

Что я нашел...
список необходимых файлов, которые заменят вам установку BDE:

blw32.dll, idapi32.dll, idr20009.dll, bantam.dll, charset.cvb, usa.btl

+ ещё для *.db таблиц файл - idpdx32.dll, для *.dbf таблиц файл - iddbas32.dll,
если используете local SQL server то ещё файлы - idsql32.dll и idbat32.dll ==>
Это кусок FAQ, сам пока не проверял

Medved

Дата 1.3.2004, 07:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 7209
Регистрация: 15.9.2002
Где: Kazakhstan, Astan a

Репутация: 14
Всего: 154

Да в ФАКе нашем это есть.

Цитата

Есть один вопрос: как сделать так чтобы локальная база данных работала без бде администратор. В моем проекте база альясы не использует.

Типичная ошибка! BDE это не поддержка alias! компоненты Дельфи такие как Table, Query, Database - почти вообще ничего не делают! - это только удобный интерфейс к BDE. Т.е. BDE реально читает и пишет в базы данных, обнавляет файлы, управляет транзакциями, сортирует данные, исполняет SQL запросы. BDE с одной стороны имеет BDE Admin для ее управления, а с другой API, которые и использует Дельфи в компонентах. Если вам надо обойтись без BDE вы должны использовать другие драйвера доступа к базам данных: ODBC, DAO, ADO, RDO - многие из них имеют свои API или COM интерфейсы которые вы можете использовать (напрямую, либо найти компоненты для этого, кроме того ADO входит в стандартную поставку дельфей, но через него приконнектится к парадоксу довольно затруднительно). Если же все эти драйвера вас не устраивают то вам надо написать свой драйвер к базе данных (можно прямо в коде программы), он должен обеспечивать:

1) Чтение и запись базы
2) Поддержка транзакций
3) Исполнение SQL запросов
4) Поддержка индексов и ключей
5) Поддержка многопользовательского доступа.
6) Стандартный набор API которые позволят подключаться компонентам типа Table, Query

Есть так же сторонние библиотеки для доступа к базам данных через свои собственные драйвера: HALCYON, или Апполо (Предложил МММ);
vkDBF- компонент для работы с ДБФ для Дельфы6/5 без БДЕ.(Предложил Free)

Цитата

Problem/Question/Abstract:

What are the essential files to ship with an application that uses the BDE?

Answer:

Delphi allows you to generate a nice tight executable file (.EXE), but if you have created a database application you must include the files that make up the Borland Database Engine as well. The table below shows the files that are mandatory when delivering a database application with Delphi.
File Name Description
IDAPI01.DLL - BDE API DLL
IDBAT01.DLL - BDE Batch Utilities DLL
IDQRY01.DLL - BDE Query DLL
IDASCI01.DLL - BDE ASCII Driver DLL
IDPDX01.DLL - BDE Paradox Driver DLL
IDDBAS01.DLL - BDE dBASE Driver DLL
IDR10009.DLL - BDE Resources DLL
ILD01.DLL - Language Driver DLL
IDODBC01.DLL - BDE ODBC Socket DLL
ODBC.New - Microsoft ODBC Driver Manager DLL V2.0
ODBCINST.NEW - Microsoft ODBC Driver Installation DLL V2.0
TUTILITY.DLL - BDE Table Repair Utility DLL
BDECFG.EXE - BDE Configuration Utility DLL
BDECFG.HLP - BDE Configuration Utility Help
IDAPI.CFG - BDE Configuation File (settings)

To assist the user, Delphi ships with an install program for exporting the appropriate files that you want deliver to your clients. Also, installation programs such as InnoSetup and InstallShield can automatically include the relevant files in their setup programs.

InnoSetup is my program installation program of choice, and it is FREE! For more information or to download a copy visit Jordan Russhttp:// www.jrsoftware.orgell's site at

Finally a tip on using the setup CAB file that ships with the BDE to install the relevant files can be found in DKB, article title "Installing BDE from BDEINST.CAB"

Цитата

If you have taken a close look at the listing of the BDE installation directory (usually \Program Files\Borland\Common FIles\BDE), you've noticed there's a file called BDEINST.CAB. If BDEINST.CAB isn't present in the BDE folder, you probably chose not to let it be installed. As this tip requires this file, you might want to run install again and install only BDEINST.CAB. Anyway, let's get back to the tip.

What is BDEINST.CAB?

BDEINST.CAB is a cabinet (Microsoft's compression format) file that contains only one large file: BDEINST.DLL. This DLL contains a simple installation program along with all the necessary files for a basic install of BDE. It will correctly install BDE with the native drivers for Paradox, dBase, MS Access and FoxPro. It won't install drivers for SQL database servers. If all you need is a basic installation of BDE for supporting one of the forementioned databases, then BDEINST.CAB is the best choice for you.

Given the problem InstallShield and Wise have with installing BDE 5, BDEINST.DLL has a great appeal, since it was created by the Borland folks and doesn't suffer from the same problems InstallShield and WISE do.

There is, however, a drawback: BDEINST.DLL is a quite large file, so it's that good if you're deploying on floppy disks. There's a workaround for this problem and we'll get back to it later on.

Using BDEINST.DLL

In order to use BDEINST.DLL, all you have to do is to extract it from BDEINST.CAB. There are several ways this can be done. Two of them are:

· Using WinZip or another CAB-compatible archiver. Simply extract BDEINST.DLL from the CAB file.

· Using Microsoft's EXTRACT utility that comes with Windows 9x and NT. From a DOS window, issue the command below (path is also shown):

·

· C:\Program Files\Borland\Common Files\BDE>EXTRACT /E BDEINST.CAB

·

· This will extract BDEINST.DLL to the current directory, since no destination dir was specified in the command line.

The task now is to use the DLL. This is as simple as issuing the command line below:

C:\WINDOWS\SYSTEM\REGSVR32.EXE /S CABINST.DLL

If the command above fails, make sure you have REGSVR32.EXE on your machine. Not all machines have it, and, in case of deploying BDEINST.DLL, it's also a good idea to deploy REGSVR32.EXE. This file can be found in \WINDOWS\SYSTEM or \WINNT\SYSTEM32.

A progress dialog box will popup indicating that the installation of BDE is going ok. This is all it takes to install BDE without needing any additional tool such as InstallShield or Wise.

If you do not want to deploy REGSVR32.EXE, you can create a small VCL-less and formless application that simply calls DllRegisterServer from the DLL.

Цитата

program InstallPrfSt;

{
Программа иллюстрирует, как установить BDE с поддержкой PARADOX 7.0
на "чистой машине" и создать алиас.
Пример использования в качестве простейшего инсталлятора для программы
C:\MyDir\MyProg.exe
1.Создайте каталог C:\MyDir\BDE и скопируйте в него след. файлы:
CHARSET.BLL
OTHER.BLL
IDAPI32.CFG
BLW32.DLL
IDAPI32.DLL
IDBAT32.DLL
IDPDX32.DLL
IDR20009.DLL
IDSQL32.DLL
BDEADMIN.EXE - по вкусу, т.к. необходимым не является.
2.Измените значение константы AliasName на имя необходимого вам алиаса.
3.Откомпиллируйте и запустите эту программу из каталога C:\MyDir.
ВHИМАHИЕ!!! Если на машине уже установлено BDE, то перед экспериментами
сохраните (на всякий случай) след. ключи из реестра:
[HKEY_LOCAL_MACHINE\SOFTWARE\Borland\Database Engine] и
[HKEY_LOCAL_MACHINE\SOFTWARE\Borland\BLW32].
}

{$APPTYPE CONSOLE}
uses
Windows, BDE, Registry;

const
AliasName: string = 'PrefStat';

var
R: DBIResult;
Path: string;

procedure WriteString(S1:string);
begin
S1 := S1 + #0;
AnsiToOem(@S1[1], @S1[1]);
writeln(S1);
end;

function GetExePath(S1:string):string;
var
I, K :Integer;
S: string;
begin
K := 1;
S := '';
for I := Length(S1) downto 1 do
begin
if S1[I] = '\' then
begin
K := I;
Break;
end;
end;

for I := 1 to K - 1 do
S := S + S1[I];

Result:=S;
end;

procedure InstallBde;
const
Bor: string = 'SOFTWARE\Borland';
var
a: TRegistry;
BPath: string;
begin
BPath:=PATH + '\BDE';
a := TRegistry.Create;
with a do
begin
RootKey := HKEY_LOCAL_MACHINE;
OpenKey(Bor + '\Database Engine', True);
WriteString('CONFIGFILE01', BPath+'\IDAPI32.CFG');
WriteString('DLLPATH', BPath);
WriteString('RESOURCE', '0009');
WriteString('SaveConfig', 'WIN32');
WriteString('UseCount', '2');
CloseKey;
OpenKey(Bor+'\BLW32',True);
WriteString('BLAPIPATH', BPath);
WriteString('LOCALE_LIB3', BPath+'\OTHER.BLL');
WriteString('LOCALE_LIB4', BPath+'\CHARSET.BLL');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\SYSTEM\INIT',True);
WriteString('AUTO ODBC', 'FALSE');
WriteString('DATA REPOSITORY', '');
WriteString('DEFAULT DRIVER', 'PARADOX');
WriteString('LANGDRIVER', 'ancyrr');
WriteString('LOCAL SHARE', 'FALSE');
WriteString('LOW MEMORY USAGE LIMIT', '32');
WriteString('MAXBUFSIZE', '2048');
WriteString('MAXFILEHANDLES', '48');
WriteString('MEMSIZE', '16');
WriteString('MINBUFSIZE', '128');
WriteString('SHAREDMEMLOCATION', '');
WriteString('SHAREDMEMSIZE', '2048');
WriteString('SQLQRYMODE', '');
WriteString('SYSFLAGS', '0');
WriteString('VERSION', '1.0');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\SYSTEM\FORMATS\DATE',True);
WriteString('FOURDIGITYEAR', 'TRUE');
WriteString('LEADINGZEROD', 'FALSE');
WriteString('LEADINGZEROM', 'FALSE');
WriteString('MODE', '1');
WriteString('SEPARATOR', '.');
WriteString('YEARBIASED', 'TRUE');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\SYSTEM\FORMATS\NUMBER',True);
WriteString('DECIMALDIGITS', '2');
WriteString('DECIMALSEPARATOR', ',');
WriteString('LEADINGZERON', 'TRUE');
WriteString('THOUSANDSEPARATOR', ' ');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\SYSTEM\FORMATS\TIME',True);
WriteString('AMSTRING', 'AM');
WriteString('MILSECONDS', 'FALSE');
WriteString('PMSTRING', 'PM');
WriteString('SECONDS', 'TRUE');
WriteString('TWELVEHOUR', 'TRUE');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\REPOSITORIES',True);
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\DRIVERS\PARADOX\INIT',True);
WriteString('LANGDRIVER', 'ancyrr');
WriteString('TYPE', 'FILE');
WriteString('VERSION', '1.0');
CloseKey;
OpenKey(Bor+'\Database Engine\Settings\DRIVERS\PARADOX\TABLE
CREATE',True);
WriteString('BLOCK SIZE', '4096');
WriteString('FILL FACTOR', '95');
WriteString('LEVEL', '7');
WriteString('STRICTINTEGRTY', 'TRUE');
CloseKey;
end;
a.Free;
end;

begin
Path:=GetExePath(ParamStr(0));
R:=dbiInit(nil);
if R<>DBIERR_NONE then
begin
WriteString('Инициализация BDE ...');
InstallBDE;
end;
R:=dbiInit(nil);
if R=DBIERR_NONE then
begin
WriteString('Инициализация BDE прошла успешно');
DbiDeleteAlias(nil, PChar(AliasName));
R:=DbiAddAlias(nil, PChar(AliasName), szPARADOX,
PChar('PATH:'+Path+'\DB'), True);
if R=DBIERR_NONE then
WriteString('Псевдоним "'+AliasName+'" создан')
else
WriteString('Ошибка создания псевдонима "'+AliasName+'"');
R:=DbiCfgSave(nil, nil, Bool(-1));
if R=DBIERR_NONE then
WriteString('Файл конфигурации сохранён')
else
WriteString('Ошибка сохранения файла конфигурации');
DbiExit;
end
else
WriteString('Ошибка инициализации BDE');
end.

--------------------

http://extreme.sport-express.ru/
...и неважно сколько падал, важно сколько ты вставал...

Diver

Дата 2.3.2004, 18:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 27.2.2004

Репутация: нет
Всего: нет

Иcчерпывающая помощь, спасибо.
Файлы собрал, в реестр записи закинул - всё OK.

Ещё раз спасибо за коллективную помощь!
Если будут проблемы - я знаю у кого спросить совета.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »