delphi dll 中转化时间格式

我要从数据库中读取日期格式，然后转化成标准（yyyy-mm-dd hh:mm:ss）的格式，已经在窗体程序中用函数实现，现在想把函数封装到DLL里面，发现封装后就无法转化了，有什么解决办法没
  
具体函数：
library Project1;
uses
  SysUtils,
  Classes；
  
  function D_timeToS(s:string):string;     {定义函数}
  begin
    result := FormatDatetime('yyyy-mm-dd hh:mm:ss',StrToDatetime（s));
  end;

  exports      {给出接口}
    D_timeToS Index 1;
begin
end.