Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

rafaeloliveira83

Criando drivers ODBC através do Delphi?

Recommended Posts

Andei pesquisando na internet e até encontrei algumas dicas para criar driver ODBC através do Delphi, mas ao testar ele não cria nada.

 

A maioria é com Access, eu utilizo MySQL e o Driver ODBC 5.1

 

Alguém sabe como fazer em tempo de execução?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Estes drivers odbc são chaves de registro em uma pasta especial.

 

este é o código que eu estou usando para gravar estes dados:

  Registro          := TRegistry.Create;
 Registro.RootKey  := HKEY_CURRENT_USER;

 Registro.OpenKey('\Software\ODBC\ODBC.INI\Locadora', True);
 Registro.WriteString('Driver', edt_driver.Text);
 Registro.WriteString('DATABASE', edt_DataBase.Text);
 Registro.WriteString('SERVER', edt_HostName.text);
 Registro.WriteString('PORT', edt_Porta.text);
 Registro.WriteString('UID', edt_Login.text);
 Registro.WriteString('PWD', edt_Senha.Text);
 Registro.CloseKey;

 Registro.OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources', True);
 Registro.WriteString('Locadora', 'MySQL ODBC 5.1 Driver');
 Registro.CloseKey;

 Registro.Free;
 MessageDlg('Dados gravados com sucesso!', mtConfirmation, [mbok], 0);
 ModalResult := mrOk;

 

Você precisaria distribuir apenas a myodbc5.dll e a libmysql.dll

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.