time???

Cze!
dlaczego datetostr(time) zwraca mi: 1899-12-30
data w kompie jest dobrze ustawiona [???]

Do funkcji DateToStr powinieneś przekazać datę, nie czas (godz., min., sek.).
Dlatego otrzymujesz nieprawidłowy wynik.
Powinieneś użyć DateToStr(Date), albo DateToStr(Now).