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 thoughts on “Delphi + MySql: Fazendo Funcionar

  • 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.

Leave a Reply

Deixe uma resposta

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

This site uses Akismet to reduce spam. Learn how your comment data is processed.