[Delphi]Acesso ao banco de dados do Access

[RickKM 2]

Olá pessoal do WC, hoje vou ensina a vocês como ter acesso a um banco de dados feito no Access. Vejo que todo mundo tem de fazer aquele trabalhos que utilizam os aplicativos do Office, estou disponibilizando a vocês uma maneira que eu aprendi de criar um simples banco de dados pelo Access e te acesso pelo Delphi.

Requisitos:

 

-Delphi (Versão utilizada Delphi 7)

-Access (Versão 2007 ou 2003)

 

Iniciando...

 

Primeiramente a gente vai criar um DB, vamos lá ao Access (Menu Iniciar > Todos os Programas > Microsoft Office > Microsoft Office Access)

 

Tela Inicial do Access

 

 

Vamos definir um nome para o arquivo DB, vamos colocar o nome de "Exemplo" e clicamos no botão Criar.

 

 

O programa vai criar um tabela com o nome "Tabela1" no modo de exibição da tabela vai estar Modo de Exibição de Folha de Dados, agora vamos mudar o modo de exibição para Modo Design.

 

 

Defina um nome para está tabela, Exemplo: Clientes

 

 

Adicione dois campos Nome e Sobrenome

 

 

Vá no botão Office (Um botão redondo no canto superior esquerdo com o logo do Office), depois Salvar Como > Banco de Dados do Access 2002 - 2003.

 

 

Dê "Sim" nas duas mensagens.

 

 

Selecione o lugar e o nome que você queira salvar o arquivo.

 

 

Delphi

 

Criamos o arquivo MDB, agora vamos ao Delphi.

 

Crie um nova aplicação e adicione os seguintes itens:

• ADOConnection (ADO)
  
• ADOTable (ADO)
  
• DataSource (Data Access)
  

 

 

Vá nas propriedades "Connection Strings" do componente ADOConnection, e clique no botão ... (3 pontos)

 

 

Clique em Build...

 

 

Selecione Microsoft Jet 4.0 OLE DB Provider e clique em "Avançar >>".

 

 

Clique no botão ... (3 pontos)

 

 

Selecione o arquivo do banco de dados e clique em "Abrir".

 

 

De OK em tudo...

 

Agora mude as seguintes propriedades:

 

ADOConnections1 - Propriedade "LoginPrompt" mude para false.

ADOConnections1 - Propriedade "Connected" mude para true.

 

ADOTable1 - Propriedade "Connection" mude para ADOConnections1.

ADOTable1 - Propriedade "TableName" mude para Clientes.

ADOTable1 - Propriedade "Active" mude para true.

 

DataSource1 - Propriedade "DataSet" mude para ADOTable1.

 

Adicione 1 DBGrid e 1 DBNavigator, mude a propriedade "DataSource" dos 2 para DataSource1

 

Deixe tudo bonitinho, agora só executar.

 

 

Créditos: RickKM ou _RicardoSouz (Todos sou eu)

 

Caso copie o tópico coloque os créditos.

[- NOOB 1]

ficou bom o tópico , bem explicado com as imagens :}

os componentes ajudam muito também , ahuauahem C# ele gera o formulário sózinho rs

Parabéns Mano , Abraços!

[Marcolin 1]

E quem disse que o delphi não gera formulários sozinhos ?

 

Você fazendo a ligação do datasource com table ou a ligação que a pessoa usa,

só adicionar todos os fields da tabela na tabela e arrastar todos para o formulário, vem todos os tipos de dados prontos, OLE, Alpha, Numero, Money, Memo, etc....

 

Só organizar os componentes apenas, ja vem todos ligados com seus devidos campos, depois só setar o code para o datamodule.

 

DataModuleCentro.TabelaTal.App....