DateToStr gibt->1899aus bei D7

[Matze]

oder auch

DateStrV := DateToStr(Now);