xConteúdo desta página Localizar registros na tabela com Locate O que são Propriedades ? O que são Eventos ? Personalizando BitBtn1 Apagar registros da tabela
Passo 001	zProcurando registros com LOCATE
Usaremos o projeto inicial Aula 001, se este projeto não estiver aberto abra clicando em File, Open project indique o caminho onde esta o arquivo Project1.dpr e dê um clique duplo neste arquivo para abrí-lo.
Este exemplo mostra como procurar / localizar registros em uma tabela.
Insira um componente Label ( mude o nome label para Procura Informações ) e um Edit1 ( pegue-os da aba/paleta Standard ), na propriedade Text do Edit apague o texto Edit1, insira um botão Bitbtn que esta na aba Additional.
Veja na imagem abaixo, no Object Inspector ( Inspecionador de Objetos ) o Delphi trabalha como Properties ( Propriedades ) e Events ( Eventos )
No formulário na direita estamos usando o componente Bitbtn1, cada componente possui sua propriedades e eventos específicos.
Propriedades: Propriedades são características básicas de um componente. Cada componente Delphi possui uma série de propriedades com um valor default (padrão), tais como: altura, fonte dos textos, estilo, cor, tipo de cursor, etc., todas elas com um valor padrão incluído pelo Delphi.
Eventos: Os programas feitos em Delphi são orientados a eventos. Eventos são ações normalmente geradas pelo usuário. Existem eventos associados ao formulário e cada componente inserido neste. Neste exemplo, ao clicar será procurado o nome de uma pessoa na tabela, ou, poderíamos manda apagar um registro, abrir outra tela, fechar etc
Veja a tela acima, o componente BitBtn1 esta selecionado, poderiamos alterar este nome para um nome de melhor compreensão, como por exemplo: Procura e não BitBtn1. Ao fazer isto estaríamos alterando a propriedade Caption , observe tela acima mais no lado esquerdo.
Após um clique duplo sobre o botão Bitbtn1 será aberto o editor de códigos do Delphi e automaticamente serão inseridas sempre um begin e um end;
entre begin e end; digite as 3 linhas abaixo:
Veja abaixo como ficou o código completo.
Vamos entender melhor a linha abaixo:
TForm1 Nome do formulário. Ex: TClientes, TFornecedores Bitbtn1 Nome do botão. Ex: Bitbtn1_Procura, Procua_Bit Click Evento. Evento que dizer uma ação que será feita no programa, ou seja, ao clicar no botão será feito a procura na tabela. Como padrão o Delphi define nomes como: TForm1, Bitbtn1 etc .... cada programa definirá uma nomeação própria que tornará a manutenção do sistema de forma bem dinâmica.
Veja na imagem abaixo a aba Additional e seus componentes. O Delphi possui várias abas com vários tipos de componentes para diferentes finalidades.
Resultado do programa ( programa pronto )
Pressione F9 para rodar / executar o programa, no campo Procura informações, digite eric, clique no botão para procurar o nome na tabela.
Para executar o programa, basta dar um clique duplo sobre Project1.exe. Poderia ter salvo como outro nome, mas preferi permanecer com o padrão ( default ) para facilitar o entendimento.
Passo 002	zPersonalizando BitBtn1
Clique no botão BitBtn1, clique na aba Properties ( lado esquerdo da tela ), clique em Caption, apague BitBtn1 e digite OK, após, mais para baixo, clique na propriedade Name, mude o nome de BitBtn1 para Ok_Bit ( nome interno do botão - ), após clique em Glyph, será aberta umam tela, clique em Load, selecione um ícone ( se tiver ), este ícone será mostrado no botão, veja abaixo:
Passo 003	zApagando registros da tabela
Apagando registros da tabela
Insira um botão Bitbtn ( aba Additional )
Clique no botão BitBtn2, clique na aba Properties ( no Object Inspector, lado esquerdo da tela ), clique em Caption, apague o nome BitBtn2 e digite Apaga registros, role para baixo, clique em Name, mude o nome de BitBtn2 para Bit_APaga e pressione Enter, veja abaixo:
Dê um clique duplo sobre o botão Apaga registros e digite digite as linhas abaixo:
Código completo abaixo:
Exemplo código rodando:
" Não orgulheis por aquilo que sabeis, porque esse saber tem limites estreitos "