Вопрс по языковому драйверу

← →
Yus (2003-06-09 19:32) [0]

Подключил базу данных через "BDE Administrstor", установил яз. драйвер. Все работает, но только на моем компьютере, т.к ссылка
Table.DataBaseName="a1". Как от этого уйти или установить драйвер вручную???

← →
Rol (2003-06-10 06:16) [1]

И что за БД? А вообще на св-во DatabaseName компонента TDatabase помощь очень детальная.

← →
tramp (2003-06-17 13:49) [2]

Мона процедуркой сделать. Например:
procedure Tdm.SetLangDrive;
var
MyStringList: TStringList;
Session: TSession;

const
dBaseLANGDRIVER: string = "LANGDRIVER=db866ru0"
begin
Session := TSession.Create(Self);
Session.AutoSessionName := True;
Session.Active := True;
MyStringList := TStringList.Create;
try
Session.GetConfigParams ("\DRIVERS\DBASE\INIT","", MystringList);
if MystringList.IndexOf(dBaseLANGDRIVER)=-1 then begin
MystringList.Clear;
MystringList.Add(dBaseLANGDRIVER);
Session.ModifyDriver("DBASE",MyStringList);
Session.SaveConfigFile;
App.MessageBox("Произведена замена языкового драйвера!!!",mb_OK + MB_ICONEXCLAMATION);
end;
except
On Err: Exception do begin
App.ShowErrorMessage(Err);
App.MessageBox("Проблемы при проверке параметров драйверов BDE!"+#13#10+
"Должно быть установленно BDE 5.0 или выше,"+#13#10+
"Проверьте установку параметров и версию BDE с помощью утилиты BDEADMIN.EXE",mb_OK + MB_ICONERROR);

end;
end;
Session.Active := False;
MyStringList.Free;
Session.Free;
end;

← →
NickBat © (2003-06-17 13:56) [3]

А на соседнем компьютере есть BDE?

← →
tramp (2003-06-18 15:43) [4]

Мдя... вопрос, действительно, не в языковом драйвере :) Насколькоя а понимаю, ты используешь dBase, а не ODBC? Скорее всего BDE просто не установлено.

Вопрс по языковому драйверу Найти похожие ветки