Вопрос по BDE

[slipknot666max]

Здраствуйте..
Вопрос такой - возможно запусть программу, написанную на Delphi (база - paradox7) без регистрации ее в BDEAdmin'е?

[solyr]

Возможно. DB это TDataBase . path - путь расположения БД. Обычно ее вычисляют так: ExtractFilePath(Application.ExeName )+'каталог БД' - путь расположения БД относительный каталога программы

DB.Connected:=false;
path:=path+'\';
DB.DatabaseName:='имя соединеия';
DB.DriverName:='STANDARD';
DB.Params.Clear;
DB.Params.Add('PATH='+path);
DB.Params.Add('DEFAULT DRIVER=PARADOX);
DB.Params.Add('LANGDRIVER= .... '); - нужная тебе кодировка

DB.Params.Add('Дугие параметры= значение параметра ')

Table1.DatabaseName:='имя соединеия';
Table1.TableName:='таблица.DB';
try
DB.Connected:=true;
Table1.Active:=True;
except
MessageDlg('Ошибка соединения с БД!',mtError,[mbOk],0);
end;
Параметры смотри в BDE Administrator

[Gorychev]

Статья - Пару слов о BDE или жизнь без псевдонимов

[slipknot666max]

ох блин.. сложновато чет для меня..
это нужно бросить на форму TDataBase и на неё наложить событие с данным текстом?
далее проделать процебуру для таблици, которая указанна в промере для каждой моей таблици?

[mihali4]

Не нужно.
Нужно только определить два свойства TTable:
DataBaseName
TableName
Второе вы знаете - сами давали имя таблице.
А первое - это путь к каталогу, где лежит эта ваша таблица..

[slipknot666max]

можете мне конкретно все расписать? как в примере..
прога называется - Abiturient, находится - D:\Abiturient
база находится - D:\Abiturient\Bases..
А то я чет не до конца понимаю где и что..

[mihali4]

procedure TForm1.FormCreate(Sender: TObject);
begin
Table1.DataBaseName:=ExtractFilePath(Application.ExeName)+'Bases';
Table1.TableName:='здесь впишите имя вашей таблицы';
end;

[slipknot666max]

а возможно ли это сделать путем копирования файлов BDEAdmin'a в папку с программой, так как намисанно на сайте Gorychev????

[mihali4]

А при чем тут BDEAdmin ???
Может быть, вы имеете в виду саму BDE ?
Так у вас в каталоге Borland Shared\BDE есть файл bdeinst.cab...
А в файле bdedeploy.txt расписано, как инсталлировать BDE на клиентский компьютер.

[slipknot666max]

ну я же изначально спрашивал, что - можно ли вообще без установки BDE.. У Gorychev на сайте это написанно, что можно это сделать с помощью копирования файлов из Borland Shared\BDE..