Einzelnen Beitrag anzeigen

Der schöne Günther
Online

Registriert seit: 6. Mär 2013
6.110 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Wieviele Zeichen hat ein Zeitstempel maximal?

  Alt 30. Aug 2016, 17:48
Einfache Aufgabe: Wie viele Zeichen brauchen wir um Datum und Uhrzeit anzuzeigen?

Mir fällt keine einfache Lösung ein. Folgendes Programm verdeutlicht es:
Delphi-Quellcode:
program Project15;

{$APPTYPE CONSOLE}

{$R *.res}

uses System.SysUtils, System.DateUtils;

var
   timestamp: TDateTime;
begin
   FormatSettings := TFormatSettings.Create('EN');

   timeStamp := EncodeDateTime(
      2016, 08, 02,
      09, 05, 03, 0
   );
   WriteLn( DateTimeToStr(timestamp) );

   timeStamp := EncodeDateTime(
      2016, 11, 22,
      12, 15, 13, 999
   );
   WriteLn( DateTimeToStr(timestamp) );

   readln;
end.
Ausgabe:
Code:
8/2/2016 9:05:03 AM
11/22/2016 12:15:13 PM
Das nur als Beispiel für ein bestimmtes FormatSetting ("EN").
  Mit Zitat antworten Zitat