mormot2怎么使用OutCustomHeaders?

[aidpoint20126]

以前用的idhttpserver做服务端,其中有2行代码:

//当前日期

AResponseInfo.CustomHeaders.AddValue('Date',DateTimeToGMT(TTimeZone.Local.ToUniversalTime(now())));

//当前时间

 AResponseInfo.CustomHeaders.AddValue('Time-Now',IntToHex(mylib.GetJavaTime(now),1));
 

现在 改为momort后,使用THttpApiServer做web服务,其中有个OutCustomHeaders我想实现上面2行代码的功能 :

Ctxt.OutCustomHeaders := 
                             'Time-Now:'+IntToHex(mylib.GetJavaTime(now),1)+
                             ';Date:'+DateTimeToGMT(TTimeZone.Local.ToUniversalTime(now()));

 

结果不行 ，改为：

Ctxt.OutCustomHeaders := 
                             'Time-Now='+IntToHex(mylib.GetJavaTime(now),1)+
                             ';Date='+DateTimeToGMT(TTimeZone.Local.ToUniversalTime(now()));

还是不行,不知道咋写了?

求大神指点？万分感谢 ！！！

 

[aidpoint20126]

没人知道吗 ？

[aidpoint20126]

麻烦大神们看看啊