日付時刻をフォーマットするにはどうすればいいですか？

Question

この日時をDelphiでどのようにフォーマットできますかWED 16/11/2016 IT 15:26これはXMLからの値であり、ちょうど16/11/2016 15:26がほしいと思う。

Answer 1

非常に簡単な解決策は、あなたが元の文字列の欲しい部分を取るために、次のようになります。

MyDateString := Copy(XMLDateString, 5, 10) + ' ' + Copy(XMLDateString, 19, 5); 

また、あなたがより良い、その値をフォーマットすることができるようにDateTime値に元の文字列を解析することもできます地域の設定に応じて、またはいつでも必要なものに応じて、目的の文字列に変換できます。

function XMLDateToMyFormat(XMLDate: string): string; 
var DateValue: TDateTime; 
begin 
    DateValue := EncodeDateTime(Copy(XMLDate, 5, 2).ToInteger, 
           Copy(XMLDate, 8, 2).ToInteger, 
           Copy(XMLDate, 11, 4).ToInteger, 
           Copy(XMLDate, 19, 2).ToInteger, 
           Copy(XMLDate, 22, 2).ToInteger, 
           0, 
           0); 

    Result := FormatDateTime('dd/mm/yyyy hh:nn', DateValue); 
end;