function DateTimeToW3DateStr(ASrc: TDateTime): String;

begin

  Result:=FormatDateTime('yyyy-mm-dd', ASrc)+'T'+FormatDateTime('hh:nn:ss', ASrc)+'+09:00'

end;