Clique para saber mais...
  Home     Download     Produtos / Cursos     Revista     Vídeo Aulas     Fórum     Contato   Clique aqui para logar | 12 de Junho de 2026
  Login

Codinome
Senha
Salvar informações

 Esqueci minha senha
 Novo Cadastro

  Usuários
130 Usuários Online

  Revista ActiveDelphi
 Assine Já!
 Edições
 Sobre a Revista

  Conteúdo
 Apostilas
 Artigos
 Componentes
 Dicas
 News
 Programas / Exemplos
 Vídeo Aulas

  Serviços
 Active News
 Fórum
 Produtos / Cursos

  Outros
 Colunistas
 Contato
 Top 10

  Publicidade

  [Artigos]  Usando Componente Zeos para Acessar o MySQL
Publicado por Admin : Quinta, Fevereiro 26, 2004 - 02:55 GMT-3 (43089 leituras)
Comentários 5 Comentários   Enviar esta notícia a um amigo Enviar para um amigo   Versão para Impressão Versão para impressão
Administrador Já usei várias versões do componente Zeos para MySQL, e pude concluir que a versão mais completa e confiável atualmente, é a versão 5.4 (disponível para download no site http://geocities.yahoo.com.br/delphicomponentes/Zeos5-4.Zip). Além de possuir todas as características das versões 6.x, a versão 5.4 está corrigida dos possíveis “Bugs” encontrados nas versões mais novas, como erros de memória por exemplo. Como não encontrei nenhum documento bem completo e passo-a-passo, de como instalar e utilizar este componente (em Português) , resolvi escrever este artigo.
Instalação do Componente

Descompacte o arquivo zeos5-4.zip na seguinte pasta:
C:\Arquivos de programas\Borland\Delphi6\Componentes (No meu caso uso o Delphi6, cabe a você adaptar o caminho para o diretório do Delphi(versão) que tiver instalado na sua máquina).

Copie os arquivos libmysql.dll, libpq.dll e libpq721.dll da pasta Componentes, (onde foram descompactados os arquivos do Zeos) para a pasta C:\Windows\System. Caso não aparecer estes arquivos na pasta Componentes, abra o Windows Explorer clique no menu Exibir, Opções de Pasta e ative a opção “Mostrar todos os Arquivos” (Fig.01). (Assim serão mostrados todos os arquivos com extensão dll para que você possa copiar para a pasta C:\Windows\System.


(Figura 1 – Mostrar todos os arquivos)

Abra o Delphi, clique no Menu Tools, Environment Options (Fig.2).


(Figura 2 – Menu Tools)

Clique na aba Library e após no botão Library Path. (Fig. 3)


(Figura 3 - Environment Options)

Na janela Directories ( Fig.4 ), clique no botão marcado em vermelho, selecione a pasta C:\Arquivos de programas\Borland\Delphi6\componentes\zeosdbo e clique no botão Add. Faça o mesmo procedimento para os seguintes diretórios: C:\Arquivos de programas\Borland\Delphi6\componentes\zeosdbo\common

(C:\Arquivos de programas\Borland\Delphi6\componentes\zeosdbo\dbase )

(Figura 4 – Janela Directories)

Clique no Menu File, Open , selecione o arquivo ZMySql6.dpk (Onde o n.º 6 indica a versão do Delphi) da pasta C:\Arquivos de programas\Borland\Delphi6\componentes\zeosdbo, e clique no botão Abrir.

Será aberta a janela de instalação de componentes (Fig.5). Clique no botão Install.


(Figura 5 – Instalação de Componentes)

Clique em OK e feche a Janela de Instalação de Componentes sem salvar alterações.

Pronto, o componente Zeos já está instalado no seu Delphi. (Fig.6)


(Figura 6 – Paleta do Zeos)

Criando uma Tabela no MySQL

Prosseguindo com nosso exemplo, vamos criar uma tabela chamada CLIENTES no MySQL.
Para “facilitar nossa vida” vamos usar o programa MySQL-Front (Disponível para Download no site http://mysqlfront.hosting.nl/pub/MySQL-Front_Setup.exe ) para criar nossa tabela.

Abra o MySQL-Front, Crie uma nova conexão (Botão New) digite os dados da conexão (Host, User, Password, etc.) e conecte com o Banco de dados.

Clique na Aba SQL Query (Fig. 7)e digite “CREATE DATABASE exemplo” e clique no botão Execute SQL (marcado em vermelho), para criar a base de dados.

Após digite o seguinte comando SQL CREATE TABLE `Clientes` (`Codigo` TINYINT (3) NOT NULL AUTO_INCREMENT, `Nome` VARCHAR (25) NOT NULL, `Endereco` VARCHAR (30) NOT NULL, `Telefone` VARCHAR (11), PRIMARY KEY(`Codigo`), UNIQUE(`Codigo`), INDEX(`Codigo`)), clique novamente no botão Execute SQL, para criar a tabela Clientes.


(Figura 7 – SQL Query)

 

Criando um simples cadastro SQL no Delphi

Crie uma nova aplicação no Delphi: Menu File -> New -> Aplication.
Insira 3 Componentes EDIT no formulário e altere as propriedades Name para:
EDTNome
EDTEndereco
EDTFone


Insira 1 Componente Button no formulário e altere a propriedade Caption para “&Cadastrar” e a proriedade Default para True.
Insira 1 componente ZmySqlDatabase, 1 componente ZmySqlTransact e 1 componente ZmySqlQuery.

Altere as seguintes propriedades:
ZmySqlDatabase
Name=ZDBClientes
DataBase=exemplo
Host= localhost
Login=root
Conected=true

ZmySqlTransact
Name=ZTCClientes
DataBase= ZDBClientes

ZmySqlQuery
Name=ZSQClientes
DataBase= ZDBClientes

No evento OnClick do Button1 (Cadastro) insira os seguintes comandos.




(Figura 8 – Tela do Cadastro)

Agora é com vocês, usem os recursos do Delphi e desfrutem o máximo do excelente SGBD MySQL (e o detalhe mais importante é grátis )e tenham certeza de que o componente Zeos é altamente confiável, tanto para aplicações modestas como para aplicações robustas.

Qualquer Dúvida entrem em contato:

Eduardo Luis Gomes
Tecnico em Processamento de dados pelo ProForte/SC
Bacharel em Informática pela UnC/Mafra/SC
Cursando Especialização em Sistemas de Segurança na Universidade Tuiutí do Paraná.
eduardo-gomes@bol.com.br






Observação: Por: Eduardo Luis Gomes



Comentários Comentários
   Ordem:  
Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos.


por: Visitante : Mar 01, 2004 - 11:42
Muito Didático,
Excelente p/ Iniciantes


por: bydelphini : Dez 24, 2004 - 07:00
(Informações sobre o membro | Enviar uma mensagem)
Para quem esta começando como eu isto e fundamental, muito obrigado, parabéns pelo excelente material realizado.


por: vpsouza : Mai 09, 2006 - 03:29
(Informações sobre o membro | Enviar uma mensagem)
Fiz tudo o que vc mando, mas na hora de rotar o exemplo dá um erro ao tentar conectar PQconnectpoll - - expected authentication request. E na hora de compilar, Build
[Fatal Error] Unit1.pas(7): File not found: 'ZToken.dcu'


por: Derek.Riggs : Jul 24, 2006 - 06:24
(Informações sobre o membro | Enviar uma mensagem)
Maigo otima materia!!!

Porem uma dúvida...eu fiz um mini aplicativo com utilizando o Zeos, e quando eu saio do meu prgrama da um erro que ta me tirando o sono...

O erro eh o seguinte Runtime error 216 at 0040447a

ja depurei o projeto e nao encontrei nada, isso pode ser uma instalação mal sucedida?
Obrigado pela atenção!!!! desde já agradeço!


por: mstofella : Set 15, 2006 - 10:29
(Informações sobre o membro | Enviar uma mensagem) http://
tenho um site que usa banco de dados mysql e estou fazendo um sistema em
> delphi6 para controlar o caixa.
>
> gostaria de saber.
>
> 1º tem como eu acessar atraves do delphi esse banco de dados no provedor
> sem ter que usar o odbc.
  Edição 112

Revista ActiveDelphi

  50 Programas Fontes


  Produtos

Conheça Nossos Produtos

Copyright© 2001-2016 – Active Delphi – Todos os direitos reservados