AULA 1 - CRIANDO CADASTRO

Então... Aqui está um breve tutorial, como sempre receita-de-bolo, de como criar um cadastro do que você quiser utilizando delphi com "banco de dados" em access.

Explicações preliminares:

-"Porque você não usa uma porra de um banco de dados de verdade?"
Ora... porque eu não sei, nem vocês pô!

Saibam que há milhões de outras formas de fazer isso, entretando essa é a única que sei fazer direito e além do mais não necessita conhecer SQL e o delphi te dá uma mãozinha na hora de pôr os formulários.

Também não haverá NADA de Object Pascal... é praticamente apenas arrastamento de botão, mas aí já é uma mão na roda pra começar a fuçar no programa depois q vc já sabe como ligar num "banco de dados" né?

Criando nosso "banco" no access

Irei supor que todo mundo aqui usa o Access 2003, pois será esse que vou usar.


Clique em novo, e na barra que aparece à direita clique em "Banco de dados em branco".
(crie uma pasta para pôr todo o sistema lá)

Salve com o nome que você desejar (aqui usarei CLIENTE)



Criando a tabela

Clique em Criar tabela no modo design.

Aparecerá uma tabela semelhante há uma planilha do excel, veja abaixo.

CLIQUE PARA AMPLIAR

Bom, seguinda a idéia da imagem você irá criar seus atributos (aqui não tem normalização não....é tudo na mesma tabela).

Criados seus atributos feche o access.
Ele perguntará se quer salvar e tal, diga que sim e digite o nome do seu projeto, no meu caso, cliente.

Ele perguntará também se deseja que ele defina uma chave primária, diga que sim. Ele criará um campo código autonumerado como chave primária.


O Delphi (suponho que esteja usando o delphi7...mas talvez funcione em outras versões)

Na tela principal do delphi você verá "Form1". Do lado esquerdo verá o Object Inspector.
O Form é onde você irá compor o sisteminha, o Object Inspector é o menu de configurações de cada um dos objetos do sistema.

Em caption no Object Inspector digite "Cliente". Veja que o nome do Form mudou de "Form1" para "Cliente", isto só faz dar nome visual às coisas.

Feito isto, vá na aba ADO e insira os objetos ADOConnection e ADOTable no seu Form.

Agora dê um clique duplo sobre o ADOConnection, clique em build, selecione "Microsoft Jet 4", avance, clique no botão "..." e ache o banco de dados que você salvou anteriormente. Dê Ok em tudo.

Beleza, agora teu banco tá ligado ao delphi, selecione o obejto ADOTable e no object inspector mude o name para "tbCliente" só por organização.

Ainda com o ADOTable selecionado, vá no Object Inspector e mude o TableName para CLIENTE. Isso vai linkar esse objeto com teu banco.

Agora selecione o ADOConnection e mude a propriedade LoginPrompt para False, senão ele vai ficar pedindo senha o tempo todo.



Agora é tranquilo... clica com o botão direito em ADOTable e clica em Fields Editor, vai abrir uma janelinha, clica com o botão direito na janelinha e clica em AddFields. Seleciona tudo e OK.

Agora seleciona tudo que tá na janelinha e joga tudo dentro do FORM...vai ficar idêntico à imagem acima...

Selecione o objeto que apareceu automaticamente no Form, o DataSource, e mude o name dele pra dsCliente.

Tudo já funciona, só falta pôr uma barra de tarefas (de inclusão, exclusão etc.)

Vai na aba Data Controls e insere DBNavigator, agora com o DBNavigator selecionado vai no Object Inspector e no DataSource escolhe dsCliente. Isso vai linkar a barra ao formulário. Agora com ele ainda selecionado, muda a opção Enabled de False p/ True.

FINALMENTES...

Agora só falta ativar e testar...

Seleciona ADOTable, e no Object Inspector muda a opção Active para True.

Prontinho!

Vai em RUN e RUN.... e o bixinho tá pegando, qualquer coisa manda um e-mail




(ajuda aê clicando nos anuncios né porra!?)