Código Delphi [-]
procedure BotonBuscar;
begin
adoquery1.sql.text := 'select fecha, hora, motivo from agenda where fecha =
'+FormatDateTime('mm/dd/yyyy',MonthCalendar1.date);
adoquery1.open
end;
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|