Cita:
Empezado por maeyanes
Hola...
Podrías hacer algo como esto:
Código Delphi [-]
procedure TMyForm.DateSearch(ADate: TDate; AQuery: TQuery);
begin
AQuery.Close;
AQuery.SQL.Text := 'select * from Tabla where Fecha = :Fecha';
AQuery.ParamByName('Fecha').AsDate := ADate;
AQuery.Open
end;
Este método recibe dos parámetros, la fecha que quieres usar para filtrar tu tabla y un objeto TQuery que es sobre el que quieres hacer el filtro...
Para llamarlo desde una forma que tenga un TDateTimePicke, un TDBGrid, un TQuery, un TDataSource y un TButton haces esto:
Código Delphi [-]
procedure TmyForm.Button1Click(Sender: TObject);
begin
DateSearch(DateTimePicker1.Date, Query1)
end;
Saludos...
|
Muy buen dia a todos, estuve buscando sobre como filtrar un dbgrid con la fecha seleccionada de un datetimepicker y encontre este hilo..
Lo que me gustaria saber es donde pones este código:
Código Delphi
[-]procedure TMyForm.DateSearch(ADate: TDate; AQuery: TQuery);
begin
AQuery.Close;
AQuery.SQL.Text := 'select * from Tabla where Fecha = :Fecha';
AQuery.ParamByName('Fecha').AsDate := ADate;
AQuery.Open
end;
Desde ya muchas gracias..
Saludos!!