Delphi + MySql: Fazendo Funcionar

Introdução

Duas ferramentas. Duas tecnologias que podem ser combinadas, usadas e aperfeiçoadas.

Delphi, linguagem visual utilizando a linguagem Pascal.

MySql, sistema de gerenciamento de banco de dados versátil que utiliza a linguagem padrão SQL.

Os programadores que utilizam o Delphi o conhecem, pois o utilizam freqüentemente, mas o MySql que é tem uma excelente rapidez em sua base de dados, é algo, hoje em dia, casualmente utilizado. Veremos mais adiante como fazer essa dependência entre as duas poderosas tecnologias.

Início

Para começarmos a trabalhar, baixe o MySql em sua mais nova versão em http://dev.mysql.com/downloads/.

Depois de instalado, em versão zip ou simplesmente instalado como um programa qualquer, acesse o diretório bin que está localizado onde você instalou o MySql. Abra o Prompt de comando juntamente com o Prompt do MySql para criarmos nosso banco de dados. Veja a Figura 1.

Digite na tela do MySql, o contexto que segue abaixo.

mysql> create database mydelphi;

Se aparecer a mensagem abaixo, está tudo certo, e assim poderemos prosseguir.

Query OK, 1 row affected (0.02 sec)

Agora, criaremos nossa tabela. Lembrando, que o MySql é igual a qualquer outro banco, em sua sintaxe SQL. Após cada linha aperte a tecla Enter em seu teclado.

mysql>  use mydelphi;

Database changed

mysql> create table usuarios(

->     id int(5) not null auto_increment primary key,

->     nome varchar(20) not null,

->     email varchar(30) not null,

->     comentario text not null

->     );

Query OK, 0 rows affected (0.11 sec)

Até aqui, está tudo certo, iremos inserir agora o conteúdo na tabela, também pelo Prompt de comando.

Novamente, veja abaixo como prosseguir para inserir informações na tabela. Após cada linha aperte a tecla Enter em seu teclado. 

mysql>  insert into usuarios (nome,email,comentario) values (‘Orlando Junior’,’kurt1022@gmail.com’,’Delphi+MySql é realmente muito bom’);

mysql>  insert into usuarios (nome,email,comentario) values (‘Zé’,’ze_zinho@zemail.com.br’,’Eita sô! Num é que esse sistema pega mesmo.’);

mysql>  insert into usuarios (nome,email,comentario) values (‘’ABC,’abc@def.com.br’,’abcdefghijlmnopqrstuvxyz’);

mysql>quit

Saia do prompt.

Base de Dados

Antes de continuarmos, baixe o componente ODBC para utilizarmos juntamente com o Delphi; em http://www.mysql.com/products/connector/odbc/. Instale-o normalmente.

Acesse o BDE Administrator e crie uma nova coluna com o nome de mydelphi, selecionando o Driver ODBC do MySql; em seguida, salve.

Veja abaixo como deve ficar a configuração da nossa nova coluna.

No menu do administrador de bancos acesse o ODBC Administrator. Adicione o driver do MySql que baixamos. Após criá-lo, irá abrir uma nova janela de configuração.

Na aba Login, digite mydelphi em Data Source Name; em Server, digite localhost; em user digite  root e em Database selecione nosso banco de dados, em seguida teste a conexão. Se exibir uma mensagem dizendo que a conexão foi realizada com êxito, poderemos prosseguir.

Salve todas as suas operações no BDE Administrator e saia dele.

Já no Delphi, personalize sua aplicação ao seu modo.

Adicione o componente ADOConnection na aba ADO. Clique em Build com a opção Use Connection String selecionada.

Para especificar nossa fonte de dados, na aba Conexão, clique em atualizar e na caixa de texto ao lado selecione a fonte myodbc. Em nome de usuário digite root, e teste a conexão. Se tudo estiver certo, poderemos prosseguir com êxito.

No Object Inspector, altere para True na opção Connected, em seguida confirme na janela que irá aparecer. Em DefaultDatabase, selecione mydelphi.

Insira o componente ADOTable e conecte-o com o outro componente; em seguida selecione nossa tabela e ative o componente.

Clique duas vezes no componente ADOTable, e com o botão direito do mouse adicione todos os campos da tabela do banco de dados. Ligue-os corretamente de acordo com seu nome e seu campo em KeyFields.

Em seguida ative o componente. Adicione o componente Data Source e selecione o DataSet no mesmo.

Para continuarmos, adicione 4 Labels com os respectivos subtítulos:

  • ID:
  • Nome:
  • E-mail:
  • Comentário:

Agora, adicione 3 DBEdits e apenas um DBMemo, juntamente com um controlador de formulários, o DBNavigator, todos localizados na aba Data Controls.

Na aba Standard, insira em nosso form 3 Buttons, com os respectivos subtítulos seguidos de seus códigos, adicionando-os entre begin e end; no evento OnClick da aba Events no Object Inspector.

– Novo

AdoTable.Append;

Self.Activate;

– Inserir

AdoTable.Append;

AdoTable.Post;

– Excluir

ADOTable.Delete;

Após a inclusão dos códigos, selecione os campos de inclusão e o navegador de formulários; e segurando a tecla shift, selecione o DataSource no Object Inspector.

Ligue corretamente os campos com seu nome respectivo de acordo com o DataField. Com isso, você irá perceber que os valores que colocamos no prompt de comando irão começar a aparecer no form principal.

Veja abaixo, como deverá ficar nosso programa.

Orlando da Silva Junior 

Compatilhe esse artigo!

2 comentários sobre “Delphi + MySql: Fazendo Funcionar

  1. Ola meu caro, muito interessante seu post, mas em meu caso deu erro, mas conferi no BD e gravou todos os dados.
    Ele dá um erro informando que não pode gravar linha em branco, mas todos os campos estão preenchidos.

  2. Adao se você não conseguiu resolver ainda (estou falando isso pois programador nunca desiste!) coloca o código aqui para ver se conseguimos te ajudar! abs

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.