Fórum For entre Datas #332295

30/10/2006

0

Delphi

Amigos, preciso fazer algo do tipo

var
  d, DataInicial, DataFinal  : TDate;
...
for d := DataInicial to DataFinal do begin
  DataSet.Insert; 
  DataSet.FieldByName(´DATA´).AsDate := d;
  DataSet.Post;
end;


para que todos os dias, entre uma data inicial e a final, sejam gravados no banco....

alguma dica?

abraços


Eniorm

Eniorm

Responder

Posts

30/10/2006

Steve_narancic 

iDias:= DataFianal - DataInicial;
for i := 0 to iDias do
begin
  DataSet.Insert;
  DataSet.FieldByName(´DATA´).AsDate := DataInicial + i;
  DataSet.Post;
end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar