Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works
Anything · Lazarus or Delphi
Random projectRandom project

TLookupEdit

Componente para pesquisa de registros em Delphi

View on GitHub

Member rating

No ratings yet.

Sign in to rate this project.

README

TLookupEdit

Componente para pesquisa de registros em Delphi.

Sobre

O componente consiste em um edit que realiza a busca dos registros de acordo com o filtro informado, criando uma grid dinâmica abaixo do edit onde pode-se selecionar o resultado desejado.

Documentação

No Object Inspector do componente é possível ajustar 6 configurações, sendo elas:

*AutoList:

  • Esta opção representa se o grid será ou não exibido no momento em que o edit recebe o foco.

--- alChange significa que o grid não será exibido quando o edit receber o foco, apenas quando digitar.

--- alEnter significa que o grid será exibido quando o edit receber o foco.

*DisplayField:

  • Esta opção representa o campo/coluna da tabela que será exibido no edit quando o registro for escolhido.

*KeyField:

  • Esta opção representa o campo/coluna chave da tabela em caso de querer recuperar o ID, por exemplo, quando o registro for escolhido. Muito últil em casos de relacionamentos de tabelas (Foreign Key)

*ListSource:

  • Esta opção representa a tabela que será listada no grid.

*SearchField:

  • Esta opção representa o(s) campo(s)/coluna(s) da tabela que será(ão) levado(s) em conta para o filtro.
  • Para informar mais de um campo, separar por ";" (ponto e vírgula). Exemplo: ID;NOME;CPF

*ShowClearButton:

  • Esta opção representa a limpeza completa do campo de uma só vez. Depois de digitar algum conteúdo, caso queira limpar o campo para iniciar uma nova busca basta clicar no botão com "x" que o campo será limpo.

*ShowColumn:

  • Esta opção representa o(s) campo(s)/coluna(s) da tabela que será(ão) exibido(s) no grid.
  • Para informar mais de um campo, separar por ";" (ponto e vírgula). Exemplo: ID;NOME;CPF

Considerações finais

  • O componente foi desenvolvido para realizar as filtragens através do método Filter da classe TDataSet, então, ele só irá trabalhar 100% corretamente se o seu componente que monta a tabela possuir essa propriedade e permitir seu uso. Adianto que essa propriedade Filter não funciona com o IBQuery da paleta Interbase. Em seu desenvolvimento o LookupEdit foi testado com ClientDataSet e FDQuery, obtendo êxito em seu funcionamento.