F�rum Select com data Maluco (MSAcces2000/ADO) #235394

01/06/2004

Estou fazendo um select com o MonthCalendar (Agenda Tipo o [color=darkblue:e7e264ec3b]MSOutlook[/color:e7e264ec3b]).
S� que ele s� funciona com [color=orange:e7e264ec3b]dias maires que 12 (Ex:13/06/2004)[/color:e7e264ec3b], pensei que podia ser os zeros a esquerda, mas como os dias 10,11,12 tamb�m n�o funcionam eu pirei!!! :?
Vejam o c�digo:

procedure TF_AgComp.FormShow(Sender: TObject);
begin
MC_Compromisso.Date:=Date;
Ed_AgData.Text:=FormatDateTime(�dd/mm/yyyy�,MC_Compromisso.Date);
Ed_AgHora.text:=FormatDateTime(�hh:mm�,time);
DM_Banco.Q_Agenda.close;
Dm_Banco.Q_Agenda.sql.Clear;
DM_Banco.Q_Agenda.SQL.Add(�Select * from Agenda where AgData=#�+Ed_AgData.Text+� Order by AgHora�);
DM_Banco.Q_Agenda.open;
end;

procedure TF_AgComp.MC_CompromissoClick(Sender: TObject);
begin
Ed_AgData.Text:=FormatDateTime(�dd/mm/yyyy�,MC_Compromisso.Date);
DM_Banco.Q_Agenda.close;
Dm_Banco.Q_Agenda.sql.Clear;
DM_Banco.Q_Agenda.SQL.Add(�Select * from Agenda where AgData=#�+Ed_AgData.Text+� Order by AgHora�);
DM_Banco.Q_Agenda.open;
end;

Eu visualizo a adoquery num dbgrid normal.

Se alguem tiver id�ia do que pode ser, me ajudem!
Grato,
Cfino.

Cfino

Curtir t�pico

+ 0

Responder