I'm not sure I understood your problem but the solution is very simple  as 
long as a typecast to Double of a TDate variable shows it's representation in 
days.

So just try this code  and you'll have the answer at your question  :

procedure TForm1.Button1Click(Sender: TObject);
var d : double;
begin
  d := encodedate(2000, 1, 1);
  showmessage(FloatToStr(Date() - d))
end;


G.Seica
--
WinMENTOR Team (http://www.winmentor.ro)

__________________________________________________
Delphi-Talk mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi-talk

Reply via email to