Requisitos :
Ter o DELPHI 7 FULL Instalado,pois é nele que "temos" a opção Database Desktop.
Conhecimento Avançado em Delphi.
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
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 :
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
Última edição por RevoProgrammer em Qua Jan 23, 2013 5:52 am, editado 1 vez(es)