Fórum como consultar em sql...... #219642
10/03/2004
0
Fableso
Curtir tópico
+ 0Posts
10/03/2004
Kyonak
Gostei + 0
10/03/2004
Skaarj
procedure TCalendar.NextMonth; begin DecodeDate(IncMonth(CalendarDate, 1), Year, Month, Day); end; procedure TCalendar.PrevMonth; begin DecodeDate(IncMonth(CalendarDate, -1), Year, Month, Day); end; procedure TCalendar.NextYear; begin DecodeDate(IncMonth(CalendarDate, 12), Year, Month, Day); end; procedure TCalendar.PrevYear; begin DecodeDate(CalendarDate, -12), Year, Month, Day); end;
Gostei + 0
10/03/2004
Ossian
Select (os campos vc quer q retorne)
from (as tabelas q vc vai cosultar)
where (Data >= DataDif)
Sendo a data um campo da sua base de dados e datadif é aquela data q vc calculo a seis meses atraz
acho q é mais ou menos isso q vc ta queredo...
Gostei + 0
10/03/2004
Skaarj
Tenta assim:
var d:TdateTime; begin d:=date; d:=d-180; with query1 do begin close; sql.text:=select * from tabela where data >= :dataInf and data <= :datasup´; parambyname(´dataInf´).asdatetime:=d; parambyname(´datasup´).asdatetime:=date; open; end; end;
Ou seja subtraimos os dias correspondentes da data atual e colocamos na var [i:258a4c4427]d[/i:258a4c4427] que sera o piso, e passamos a data atual como teto.
Boa sorte
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)