function W3DateStrToDateTime(ASrc: String): TDateTime;

var

  s: String;

begin

  // 2010-01-16T10:18:24+09:00

  s:=ASrc;

  s:=StringReplace(s,'-','/',[rfReplaceAll]);

  s:=StringReplace(s,'T',' ',[rfReplaceAll]);

  s:=StringReplace(s,'+09:00','',[rfReplaceAll]);

  Result:=StrToDateTime(s);

end;