Fórum Estou com dificuldades para criar uma Querie para agenda???? #182390
16/09/2003
0
Estou criando uma agenda e gostaria de criar uma consulta do tipo:
Selecione os campos hora,nome da tabagenda que tenha somente a data de hoje do Fulano.
O uqe eu quero e a agenda do dia do fulano que eu digitar no edit1.text.
Sera que fui claro?
Obrigado. :lol:
Selecione os campos hora,nome da tabagenda que tenha somente a data de hoje do Fulano.
O uqe eu quero e a agenda do dia do fulano que eu digitar no edit1.text.
Sera que fui claro?
Obrigado. :lol:
Marcelo_j.
Curtir tópico
+ 0
Responder
Posts
16/09/2003
Rodrigo Coutinho
Olá amiga, no evento OnKeyPress do Edit1.Text faça o seguinte:
Var Qry: tQuery;
begin
If Key = Chr(13) Then
Begin
Qry := tQuery.Create(Self);
With Qry do
Begin
Databasename := PathBase;
Sql.Clear;
Sql.Add(´Select Nome, Hora From TabAgenda´);
Sql.Add(´Where Nome Like :Nom´);
ParamByName(´Nom´).AsString := Edit1.Text + ´¬´;
Open;
End;
End;
End;
Amigo talvez isto te ajude de alguma forma resolver o seu problema.
[], Rodrigo Coutinho
Var Qry: tQuery;
begin
If Key = Chr(13) Then
Begin
Qry := tQuery.Create(Self);
With Qry do
Begin
Databasename := PathBase;
Sql.Clear;
Sql.Add(´Select Nome, Hora From TabAgenda´);
Sql.Add(´Where Nome Like :Nom´);
ParamByName(´Nom´).AsString := Edit1.Text + ´¬´;
Open;
End;
End;
End;
Amigo talvez isto te ajude de alguma forma resolver o seu problema.
[], Rodrigo Coutinho
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)