Buscar por:

Cria consulta no delphi.

Código

Olá amigos. vou mostra como fazer  um consulta ao banco de dados access.

primeiramente como o banco já criado abra o delphi e no form1 coloque os

componentes adoconnection e adotable, na aba ADO e DataSource na aba Data Access.

de um duplo clique no componentes adoconnection, clique em Build, selecione

Microsoft jet 4.0 OLE DB Provider, clique em avançar, clique em ...

selecione a tabela access, clique em Testar conexão, sem estiver tudo correto de OK até sair.

Agora é o grande pulo do gato para vc poder abrir o programa em qualquer pasta:

No Object Inspector na aba Properties, clique em ConnectionString em apague o endereço do banco de dados;

depois na mesma aba clique em loginprompt selecione false, tambem Connected, selecione true.

Selecione o componente adotable e no Object Inspector na aba Properties, clique em Connection e selecione o adoconnection,

tablename seleciona a table do banco de dados e em Active selecione true.

selecione o componente DataSource e no Object Inspector na aba Properties, clique em Dataset e selecione a tabela.

Pronto!!! Já CONECTAMOS A NOSSA TABLE NO BANCO DE DADOS.

Agora acrescente no form um componente edit na aba standard e na aba data controls acrescente um DBGrid.

Selecione DBGrid e no Object Inspector na aba Properties, clique em Datasource e selecione Datasource1.

No edit de um duplo clique em aparecerá o Code. e digita:

adotable1.Locate('Campo da tabela do banco de dados ',Edit1.Text,[loCaseInsensitive, loPartialKey] );

precione F9 para executar e pronto!!!