Существует ли версия функции Delphi EncodeDate / DecodeDate, которая может обрабатывать B.C. даты?

Функции Delphi EncodeDate / DecodeDate, похоже, могут обрабатывать только даты после 1.1.0001. Существуют ли некоторые реализации EncodeDate / DecodeDate, которые могут обрабатывать B.C. Значения tDateTime?