Busca automatica

Delphi

08/03/2003

Olá Pessoal !!!

Eu queria saber se tem como fazer uma busca no sistema na hora em que ele é aberto e como é feito??

Ex. Tenho um program ade cadastro de Clientes e ao abrir o programa eu queria que ele enviasse uma mensagem de que há clientes aniversariando naquele dia e desse a opção de emitir um relatorio.

uso BD paradox
Obrigado a todos.


Nill

Nill

Curtidas 0

Respostas

Anonymous

Anonymous

08/03/2003

para isso use um componente Query ou ADOQuery se estiver usando o banco Access.
na propriedade SQL coloque:

Select *
From tabelaClientes
Where DataAniver = :Data

no evento OnCreate ou OnShow do form coloque:

Query.Close;
Query.Parameters[0].Value := Date; //essa é a data de hoje
Query.Open;

Pronto, daí é só você mandar mostrar os registros em algum DBGrid, Memo ou o que vc quizer!

Um abraço.


GOSTEI 0
POSTAR