[DELPHi7] Criando um Sistema de Cadastramento Basico!

Ae galera, não vi nada parecido e resolvir fazer um tutorial de como Criar um Sistema de Cadastro de Pessoas em Delphi 7!

Itens Necessarios : InterBase (IbConsole) , BDE Administrator e Delphi , todos vem no CD do delphi 7.

Vamos lá.

Abra o Ibconsole ( Iniciar -> Todos os Programas -> Interbase ), vai estar essa tela.





Agora vá no canto superior esquerdo, e clique no botão *Register a new InterBase Server*

Vai abrir uma janela, Coloque Local Server e em User Name Coloque "SYSDBA" e password "masterkey" (sem aspas)

Agora clique com o botão direito em Database e coloque Create Database





Em FileName coloque o destino do arquivo a ser criado. exemplo : C:\webcheats.gdb
E em Alias o nome do Arquivo , Aperte OK

Agora vamos criar a table - Va la em cima, tem um botao escrito SQL , aperte nele.





No campo que sugir, bote o seguinte codigo:

CREATE TABLE "CADCLIENTES"
(
"NOME" VARCHAR(100) NOT NULL,
"ENDE" VARCHAR(100),
"NUMTEL" VARCHAR(100),
CONSTRAINT "PK_CADCLIENTES" PRIMARY KEY ("NOME")
);

*¹ Se você for alterar quando for criar o seu, nunca se esqueça de diferenciar as MAIUSCULAS das MINUSCULAS . É case sensitive.

Agora aperte CTRL + E , se der tudo certo ficara tudo em branco, fexe o SQL e vá em tables que terá criado o CADCLIENTES.

---

Agora vamos abrir o BDE Administrador *(Inicio - Todos os Programas - Borland Delphi 7 - BDE Administrator.)**

Clique CTRL + N e crie como INTRBASE





Renomei o INTRBASE para o nome do seu arquivo. Agora vá em "SERVER NAME" clique nos 3 pontinhos ( ... ) e selecione o arquivo que você crio ( C:\webcheats.gdb lembra?)
Vá em User Name e coloque SYSDBA .





Clique CTRL + A aperte OK para salvar e pode fexar o BDE !

---

Agora vamos abrir o delphi 7 (finalmente!)

Adiciona um DataSource (aba DataAcess) um Database (aba BDE) e um Table (aba BDE)

Clique no DataBase - Vá no Object Inspector - Alias Name , clique na setinha pra baixo e selecione o nome do seu arquivo (que nois criamos no BDE) no Database Name coloque " CAD_CLIENTE " (sem aspas) e no Connect mude de False para True (se pedir para entrar coloque a senha masterkey lembra?) !



Agora va na Table - Object Inspector - DataBase name clique na setinha coloque CAD_CLIENTE | Na table name clique setinha para baixo e coloque CADCLIENTES | E em active mude de False para TRUE.



Agora clique no DataSource , vá em DataSet aperte setinha pra baixo e coloque Table 1.

Nossa Database, table e datasource estão configuradas.

Agora vá na aba Stardard, adicione 3 *****s

Digite no ***** 1 : Nome:
***** 2 : Endereço:
labes 3 : Num. Telefone:

Agora vá na aba datacontrols e adicione o DBEdit , 1 para cada *****, ou seja, 3 dbedit.

Clique no DBEdit1 e vá as Object Inspector, na linha DataSource coloque DataSource 1 e em DataField coloque "NOME".





Clique no DBEdit2 e vá as Object Inspector, na linha DataSource coloque DataSource 1 e em DataField coloque "ENDE".
Clique no DBEdit3 e vá as Object Inspector, na linha DataSource coloque DataSource 1 e em DataField coloque "NUMTEL".

Agora vá a GUIA DataConstrols e adiciona DBnavigator.
Clique no DbNavigator, vá no Object Inspector, na linha Align como alBottom, e na linha DataSource clique na setinha e coloque DataSource1



Agora diminua o **** para ficar mais bonito, aperte F9 e pronto, temos um sistema de cadastramento basico!



--- APRENDENDO A MEXER NO PROGRAMA ---

Você digita os Dados (NOME, ENDE, NUMTEL) clica no + , vai adicionar na DataBase . Dai é so ir pro lado e pro outro para ver os que voce adicionou! Se você quiser apagar aperte no - (menos)

----------------------------------------------------------

Mas bidoow, agora sempre quando eu entrar no programa vai pedir a senha ? 

Da pra a gente tira isso.

Clique em DataBase1 - Params - Vai ta escrito (TStrings) , clique naqueles 3 pontinhus [ ... ] 
Vai tar escrito KEY - USER NAME
Troque por PASSWORD masterkey

Ele não vai te pedir a senhaa!