Usuário: Senha: Registre-se || Recuperar Senha
Facebook của lớp ĐH Tin3aYoutube
Crietion Forums


Você não está conectado. Conecte-se ou registre-se

Ver o tópico anterior Ver o tópico seguinte Ir para baixo  Mensagem [Página 1 de 1]

1Aplicação de Cadastro Avançado Empty Aplicação de Cadastro Avançado Ter Jan 22, 2013 9:15 am

RevoProgrammer

RevoProgrammer
Membro De Honra
Requisitos :
Ter o DELPHI 7 FULL Instalado,pois é nele que "temos" a opção Database Desktop.
Conhecimento Avançado em Delphi.


Bom,Vamos ao Tutorial

1. Abra o Iniciar > Programas > Borland Delphi 7 > Database Desktop
2. Depois Clique em File > New > Table.

3. Irá aparecer uma tela clique em Ok

4. As "Opções" da Aplicação,eu vou fazer de uma empresa de vendas de carros por exemplo,você faça de acordo com o que precisar.

5. Para Opções que Contém Datas o Números Coloque o Size 50 e para Nome do cliente e endereço por exemplo coloque o Size no 75 e o type coloque em todos a letra A.

6. Salve o seu "projeto" do Database Desktop em alguma pasta,Recomendo que crie uma pasta nova pois você terá que coloca



7. Abra o Delphi,não mexa em nada e Salve o Projeto e a Unit na mesma pasta em que salvou o arquivo do DATABASE DESKTOP.

8. Após ter Salvo e Fechado o Projeto abra o Delphi novamente

9. Crie um Table da Paleta BDE

10. Com o Table Selecionado procure na Object Inspetor o Propriedade Table Name clique nela e selecione seu banco de dados e depois na propriedade Active deixe em true.

11. Clique 2x no table irá aparecer uma "Mini-Tela" clique com o botão direito nela e depois clique com o Botão Esquerdo em : Add All Filds.Selecione todas as opções que você fez e arreste para o Form.

12. Adicione um DBGrid da Paleta Data Controls.

13. Com o DBGrid Selecionado procure a propriedade Data Source e selecione DataSource1.

14. Adicione 5 BitBtn Buttons e coloque os seguintes nomes : Inserir,Editar,Excluir,Fechar e Novo, respectivamente; Adicione imagens se preferir.

15. Deixe o Form mais bonitinho mudando o seu caption,Colocando a Propriedade Border Style em bsSingle e biMaximize(BorderIcons)em false,"pinte" ele de alguma cor vai ficar Style.

16. Vamos Adicionar os Códigos nos Buttons :


Botão Inserir

Código:
Table1.Append;
DBEdit2.SetFocus;
BitBtn1.Enabled :=false; 


Botão Editar

Código:
Table1.Edit;
DBEdit2.SetFocus;
BitBtn2.Enabled :=false;


Botão Excluir


Código:
Table1.Delete;

Botão Fechar

Código:
Application.Terminate;



Botão Novo
Código:

Table1.Post;
BitBtn1.Enabled:=true;
BitBtn2.Enabled:=true; 

RevoProgrammer
affraid



Última edição por RevoProgrammer em Qua Jan 23, 2013 5:52 am, editado 1 vez(es)

2Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 9:23 am

i.Hacked

avatar
Administrador
Muito Bom Amigo. .

3Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 9:29 am

RevoProgrammer

RevoProgrammer
Membro De Honra
Código:
Muito Bom Amigo. .

Obrigado IHacked ... Tenha Um Otimo Dia Very Happy

4Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 10:46 am

Slyfer

avatar
[E]stagiario
Muito bom, amigo, está fazendo um ótimo trabalho !

5Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 12:19 pm

RevoProgrammer

RevoProgrammer
Membro De Honra
Slyfer:
Muito bom, amigo, está fazendo um ótimo trabalho !

Obrigado ... Tenha Um Otimo Dia ! Very Happy

6Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 1:29 pm

iNike

iNike
Progammers
Otimo post. Bela formatação nas fontes :d
Thanks Novamente!

https://revolutioncheats.forumeiros.com/

7Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 1:38 pm

RevoProgrammer

RevoProgrammer
Membro De Honra
iNike
Otimo post. Bela formatação nas fontes :d
Thanks Novamente!

Obrigado iNike Estou Para Ajuda.. !!

8Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 1:57 pm

MulekAnonymo

MulekAnonymo
Cheater
Bem Legal Cara!
Eu,to Comesando Agr Em Delphi xD.
Bem Legal To Aprendendo Muito Com A Database Wink.

9Aplicação de Cadastro Avançado Empty Re: Aplicação de Cadastro Avançado Ter Jan 22, 2013 2:11 pm

RevoProgrammer

RevoProgrammer
Membro De Honra
MulekAnonymo:
Bem Legal Cara!
Eu,to Comesando Agr Em Delphi xD.
Bem Legal To Aprendendo Muito Com A Database Wink.

Obrigado ... Visite o Forum Sempre postarei novidadas ! ... Além de Tudo Bem VIndo !

Conteúdo patrocinado


Ver o tópico anterior Ver o tópico seguinte Ir para o topo  Mensagem [Página 1 de 1]

Permissões neste sub-fórum
Não podes responder a tópicos