Conectando MySQL com Delphi 7 e outras versões

Apesar da segurança do Java, além de outros aspectos, ainda há empresas que desenvolvem com Delphi e eu acho que sempre haverá, pelo menos enquanto a linguagem existir. Eu por exemplo, agora estou trabalhando em um empresa que desenvolve em Delphi, e por isso estou aprendendo e relembrando algumas coisas, das quais irei partilhar com vocês leitores do Clube dos Geeks e interessados no assunto, principalmente para aqueles que estão começando no ramo. Vamos usar o Delphi 2007, mas darei um boa dica para quem usa a versão 7, que tem dificuldade em conectar a bancos MySQL com versão acima da 5.0.

Configurando para conectar MySQL no Delphi 7

Sugiro que você que uso Delphi 7 instale a versão 5 do MySQL, mas se quiser pode instalar uma versão mais recente, só não posso garantir que vai funcionar. Baixe o MySQL aqui, no site oficial. Depois disso execute a instalação e vamos lá.

1 – Após a instalação do MySQL ter sido completada faça o download deste drive AQUI, e descompacte o arquivo dbxopenmysql50.dll, enviando-o para a pasta “C:\Arquivos de programas\Borland\Delphi7\Bin\”;

2 – Abra o arquivo dbxdrivers.ini localizado na pasta “C:\Arquivos de programas\Arquivos comuns\Borland Shared\DBExpress” com o Bloco de Notas ou outro editor de texto e altere as seguinte linhas:

* Na seção [Installed Drivers] adicione a seguinte linha:

MySQL50=1

* E abaixo da seção adicione o seguinte código:

[MySQL50]
GetDriverFunc=getSQLDriverMYSQL50
LibraryName=dbxopenmysql50.dll
VendorLib=libmysql.dll
HostName=ServerName
Database=DBNAME
User_Name=user
Password=password
BlobSize=-1
ErrorResourceFile=
LocaleCode=0000

O arquivo ficará assim:

fdfs

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Agora salve e feche o arquivo.

Curta:

3 – Vá na pasta “C:\Arquivos de programas\MySQL\MySQL Server 5.0\bin”, e localize o arquivo libmySQL.dll, copie ele para a pasta “C;\Windows”;

Fazendo a conexão com o Banco de Dados, Delphi 7 e 2007

A partir daqui será feita a conexão com o Banco de Dados, os passos a seguir servem tanto para a versão 7 do Delphi, quanto para a 2007 e outras versões.

4 – Pronto, agora abra o Delphi 7 e adicione os seguintes componentes: SQLConection, SQLQuery, DataSetProvider, ClienteDataSet e DataSource;

da

 

 

 

 

 

 

 

5 –  Dê um duplo-clique no SQLConnection, clique em Add, selecione MySQL50 e dê um nome a sua conexão;

sqlcon

 

 

 

 

 

 

 

 

 

6 – Agora preencha os campos da conexão: HostName = localhost (se acaso for uma conexão remota coloque o endereço IP o nome da máquina que será acessada), DataBase = O nome do Banco de Dados que você vai acessar (veiculos é apenas um exemplo), User_Name = Normalmente é “root”, mas acaso você tenha cadastrado outro na instalação do MySQl, use ele, e Password = que por padrão é em branco, mas que pode ser alterado na instalação do MySQL. Os campos não citados não nos são importantes.

7 – Agora no botão circulado de vermelho e depois no circulado de verde para testar a conexão. Para evitar que seja solicitado login todas as vezes que for conectar, saia desta tela, selecione o elemento SQLConnection, altere a propriedade LoginPrompt para false.

fddffds

 

 

 

 

 

 

 

 

 

8 – Agora selecione o elemento SQLDataSet, procure pela propriedade SQLConnection, e selecione o elemento de mesmo nome. Na propriedade CommandText selecione uma tabela do banco de dados e os campos dela, de preferência * que são todos. Depois mude a propriedade Active para true;

9 – Depois, com o elemento DataSetProvider selecionado, vá a propriedade DataSet e selecione o SQLDataSet1;

10 – Ligue o ClientDataSet1 ao DataSetProvider1 pela propriedade ProviderName do ClientDataSet. Depois ligue o DataSource1 ao ClientDataSet1 e o SQLQuery1 ao DataSource1;

11 – Não esqueça de dar um duplo-clique no ClientDataSet1, clicar com o botão direito do mause>>Add Files, selecione as colunas desejadas e pronto.

Espero ter ajudado, qualquer dúvida, crítica ou sugestão é só comentar ai, obrigado a todos, curtam nossa página no Facebook:

Sobre o autor:

Graduado em Análise e Desenvolvimento de Sistemas - FLS; Desenvolvedor Full-stack na UniLeão; Revisor de conteúdo do site Clube dos Geeks, católico, gosto de ler e escrever.

Postagens relacionadas:

8 respostas

  1. Paula

    “Vá na pasta “C:\Arquivos de programas\MySQL\MySQL Server 5.0\bin”, e localize o arquivo libmySQL.dll”

    Não encontro esse arquivo de jeito nenhum, já busquei em todo o C: e nada…O que devo fazer? Instalei o MySQL pelo xampp.

    Responder
  2. Carol

    Olá! estou com um problema na hora de alterar a propriedade Connected para True. Surge o seguinte erro: dbExpress Error: Invalid Precision .
    Estou utilizando o delphi 7 e Conexão ao MySQL 5.0

    Responder

Deixe uma resposta para Carol Cancelar

Seu e-mail não será publicado.