Configuração do BDE: Erro n° 3E06

06/03/2003

0

Criei uma aplicação usando tabelas PARADOX e um outro executável apenas para instalar e configurar o BDE.
Só que quando vou executar a aplicação aparece o seguinte erro do BDE:

[b]Error 3E06 - Impossível carregar driver de linguagem[/b]

Agradeço se alguém puder me ajudar!!! ESTOU PRECISANDO MUITO!!!

O código que estou executando é o seguinte:

/**************************************
Registry := TRegistry.Create;

Try
Registry.RootKey := HKEY_LOCAL_MACHINE;
If Registry.CreateKey(´SOFTWARE\Borland´) Then
Begin
If Registry.CreateKey(´SOFTWARE\Borland\Database Engine´) Then
If Registry.OpenKey(´SOFTWARE\Borland\Database Engine´, True) Then
Begin
Registry.WriteString(´DLLPATH´, ´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\´);
Registry.WriteString(´CONFIGFILE1´, ´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\IDAPI.CFG´);
End;
Registry.OpenKey(´\´, True);
If Registry.CreateKey(´SOFTWARE\Borland\BLW32´) Then
If Registry.OpenKey(´SOFTWARE\Borland\BLW32´, True) Then
Begin
Registry.WriteString(´BLAPIPATH´, ´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\´);
Registry.WriteString(´LOCALE_LIB1´, ´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\USA.BTL´);
Registry.WriteString(´LOCALE_LIB2´, ´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\EUROPE.BTL´);
End;
Registry.OpenKey(´\´, True);
If Registry.CreateKey(´SOFTWARE\Borland\Database Engine\Settings\DRIVERS\PARADOX\INIT´) Then
If Registry.OpenKey(´SOFTWARE\Borland\Database Engine\Settings\DRIVERS\PARADOX\INIT´, True) Then
Begin
Registry.WriteString(´LANGDRIVER´, ´ANSII850´);
Registry.WriteString(´TYPE´, ´FILE´);
Registry.WriteString(´VERSION´, ´4.0´);
End;
Registry.OpenKey(´\´, True);
If Registry.CreateKey(´SOFTWARE\Borland\Database Engine\Settings\DRIVERS\PARADOX\TABLE CREATE´) Then
If Registry.OpenKey(´SOFTWARE\Borland\Database Engine\Settings\DRIVERS\PARADOX\TABLE CREATE´, True) Then
Begin
Registry.WriteString(´BLOCK SIZE´, ´2048´);
Registry.WriteString(´FILL FACTOR´, ´95´);
Registry.WriteString(´LEVEL´, ´7´);
Registry.WriteString(´STRICTINTEGRTY´, ´TRUE´);
End;
End;
Finally
Registry.CloseKey;
Registry.Free;
End;
/**************************************

E copio os arquivos abaixo para o diretório:
´C:\Arquivos de programas\Arquivos comuns\Borland Shared\BDE\´

- EUROPE.BTL
- USA.BTL
- IDR20009.DLL
- IDAPI32.DLL
- BLW32.DLL
- IDAPI.CFG
- IDPDX32.DLL


Mateusassis

Mateusassis

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar