1 Criando formulário de cadastro de clientes com ADO ! Sex Fev 01, 2013 5:17 pm
Moedas : 278
Mensagens : 1177
Idade : 26
Humor : Forever Alone T.T
Reputação : 28
Mensagens : 1177
Idade : 26
Humor : Forever Alone T.T
Reputação : 28
RodrigoNunes
Primeiramente, vamos relembrar como fazer um Banco de Dados no Access
para utilizarmos na conexão com o formulário. Lembrando que os nomes do
BD e das tabelas são opcionais, desde que você coloque certinho os
nomes nas Properties do ADO.
Utilizando Microsoft Access
Para cadastrar os usuários, senhas e clientes deste software utilizaremos o ACCESS. Então vá abrindo o seu aí!
Depois que seu Access estiver aberto, procure salvar seu BD junto com os arquivos do Delphi.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Atenção, quando for salvar mude o tipo do BD para (formato 2000) e verifique se seu BD foi salvo com a terminação .mdb.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Pronto, agora pode criar seu BD![Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Quando executar seu Access clique em Modo de Exibição de Folha de Dados para inserir os Campos.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois volte para o Modo Design para cadastrar um usuário, só para o teste.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora , antes de finalizar o Access, crie outra tabela com os
seguintes campos, que será a de armazenamento dos dados de clientes:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
ADO
Agora crie uma janelinha de login como a seguinte:[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]
Por enquanto usaremos os mesmos ADOs utilizados nos posts anteriores que são ADOConnection e ADOQuery:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
De 2 cliques no ADO Connection, aparecerá a seguinte janela, então clique Build…
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Na Próxima Janela selecione a Opção Microsoft Jet 4.0 OLE DB Provider, é o provedor utilizado pelo Access.Clique em Avançar.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Na Próxima janela clique em “…” e procure onde salvou seu BD, depois teste sua conexão e de OK.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Ainda com o ADOConnection selecionado vá em Properties>Connected e marque True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora vá no ADOQuery e vá em Properties>Active e marque True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Programando
Feito isso, hora de programar o botão Entrar.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora crie um novo formulário, de preferência com o nome que está no
código acima para evitar mudanças no código. Este formulário será o
principal e servirá para cadastrar os clientes.
Depois de criado esse formulário, você deve fazer o seguinte: [Tens de ter uma conta e sessão iniciada para poderes visualizar este link]Project>Options e fazer como na imagem:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Isto servirá, para que o outro formulário não seja carregado junto com o de Login.
Outra coisa importante a se fazer é ir em File>Use Unit, para
possibilitar a interação entre os 2 FORMs. Faça isso nos 2 FORMs.
Montando Tela de Cadastro
Agora que está tudo certinho com a tela de Login e ja temos um formulário criado, vamos deixá-lo assim:[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Primeiramente vamos adicionar um ADOTable que se localiza na Aba ADO:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois de adicionado o ADOTable, iremos nas Properties dele, e em
Connection, o conectaremos com o ADOConnection1 do
frm_principal,.Depois, em Active habilitaremos True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora adicionaremos os Labels e os Edits manualmente, mas com uma
exceção, nos Edits utilizaremos um diferente que é o DBEdit, encontrado
na Aba Data Controls, isso facilitará a conexão com o BD.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois de adicionados todos os Labels e Edits, renomeie os Edits como no exemplo. Ex: “DB_nome”
Feito isso, adicione um DataSource encontrado na Aba DataAccess:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Então vá nas Properties do DataSource e em DataSet ligue este componente com o ADOTable, selecionando o nome de tal.
[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]
Agora então vá nas properties de cada DBEdit e conecte-o ao
DataSource através da Propriedade DataSource e depois escolha o campo
correspondente na propriedade DataField:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]Não se esqueça de fazer isso em todos!
Agora vamos adicionar uma DBNavigator para facilitar o cadastro. Ela
se encontra na Aba DataControls e em suas propriedades deve-se
conectá-la ao DataSource também.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora adicione um DBGrid, para facilitar a visualização dos
cadastros. Ele se localiza também na Aba DataControls e também deve ser
conectado ao DataSource como nos outros!
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora é só deixar tudo salvo certinho e colocar o programa pra rodar!
Na hora que estiver executando, a DBNavigator servirá pra Adicionar +
Cadastros ou Remover-, assim como você poderá locomover-se entre os
cadastros através das setinhas!
Credit's: delphi4humans
para utilizarmos na conexão com o formulário. Lembrando que os nomes do
BD e das tabelas são opcionais, desde que você coloque certinho os
nomes nas Properties do ADO.
Utilizando Microsoft Access
Para cadastrar os usuários, senhas e clientes deste software utilizaremos o ACCESS. Então vá abrindo o seu aí!
Depois que seu Access estiver aberto, procure salvar seu BD junto com os arquivos do Delphi.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Atenção, quando for salvar mude o tipo do BD para (formato 2000) e verifique se seu BD foi salvo com a terminação .mdb.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Pronto, agora pode criar seu BD![Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Quando executar seu Access clique em Modo de Exibição de Folha de Dados para inserir os Campos.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois volte para o Modo Design para cadastrar um usuário, só para o teste.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora , antes de finalizar o Access, crie outra tabela com os
seguintes campos, que será a de armazenamento dos dados de clientes:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
ADO
Agora crie uma janelinha de login como a seguinte:[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]
Por enquanto usaremos os mesmos ADOs utilizados nos posts anteriores que são ADOConnection e ADOQuery:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
De 2 cliques no ADO Connection, aparecerá a seguinte janela, então clique Build…
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Na Próxima Janela selecione a Opção Microsoft Jet 4.0 OLE DB Provider, é o provedor utilizado pelo Access.Clique em Avançar.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Na Próxima janela clique em “…” e procure onde salvou seu BD, depois teste sua conexão e de OK.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Ainda com o ADOConnection selecionado vá em Properties>Connected e marque True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora vá no ADOQuery e vá em Properties>Active e marque True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Programando
Feito isso, hora de programar o botão Entrar.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora crie um novo formulário, de preferência com o nome que está no
código acima para evitar mudanças no código. Este formulário será o
principal e servirá para cadastrar os clientes.
Depois de criado esse formulário, você deve fazer o seguinte: [Tens de ter uma conta e sessão iniciada para poderes visualizar este link]Project>Options e fazer como na imagem:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Isto servirá, para que o outro formulário não seja carregado junto com o de Login.
Outra coisa importante a se fazer é ir em File>Use Unit, para
possibilitar a interação entre os 2 FORMs. Faça isso nos 2 FORMs.
Montando Tela de Cadastro
Agora que está tudo certinho com a tela de Login e ja temos um formulário criado, vamos deixá-lo assim:[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Primeiramente vamos adicionar um ADOTable que se localiza na Aba ADO:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois de adicionado o ADOTable, iremos nas Properties dele, e em
Connection, o conectaremos com o ADOConnection1 do
frm_principal,.Depois, em Active habilitaremos True.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora adicionaremos os Labels e os Edits manualmente, mas com uma
exceção, nos Edits utilizaremos um diferente que é o DBEdit, encontrado
na Aba Data Controls, isso facilitará a conexão com o BD.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Depois de adicionados todos os Labels e Edits, renomeie os Edits como no exemplo. Ex: “DB_nome”
Feito isso, adicione um DataSource encontrado na Aba DataAccess:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Então vá nas Properties do DataSource e em DataSet ligue este componente com o ADOTable, selecionando o nome de tal.
[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]
Agora então vá nas properties de cada DBEdit e conecte-o ao
DataSource através da Propriedade DataSource e depois escolha o campo
correspondente na propriedade DataField:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]Não se esqueça de fazer isso em todos!
Agora vamos adicionar uma DBNavigator para facilitar o cadastro. Ela
se encontra na Aba DataControls e em suas propriedades deve-se
conectá-la ao DataSource também.
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora adicione um DBGrid, para facilitar a visualização dos
cadastros. Ele se localiza também na Aba DataControls e também deve ser
conectado ao DataSource como nos outros!
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Agora é só deixar tudo salvo certinho e colocar o programa pra rodar!
Na hora que estiver executando, a DBNavigator servirá pra Adicionar +
Cadastros ou Remover-, assim como você poderá locomover-se entre os
cadastros através das setinhas!
Credit's: delphi4humans