Hallo!

Ich habe einen Datums-Zeit-String im Format: "yyyy-mm-dd hh:mm:ss" und möchte den nun in ein DateTime-Wert konvertieren.
Ich habe nun schon einige Datumskonvertierungs-Methoden versucht, aber ich komme nicht zum richtigen Ergebnis!

Wäre nett, wenn jemand einen Lösungsvorschlag posten könnte.

Am besten wäre sowas:

markieren

Delphi-Quellcode:

var
  DateTime : TDateTime;
begin
  DateTime := XXX('2004-02-02 14:53:49');
end;

Gruß,
Steffen

guck ma nach FormatDateTime

mfG
mirage228

FormatDateTime liefert einen String zurück...

Na dann schau dir mal DecodeDate und EncodeDate an

Zitat von Steffen:

FormatDateTime liefert einen String zurück...

Hi. und StrToDateTime() liefert einen DateTime Wert zurück

Man liest sich, Stanlay

bei function StrToDateTime(const S: string): TDateTime; overload; haut das mit der Formatierung nicht so ganz hin...

dann gibt's da die Funktionfunction StrToDateTime(const S: string; const FormatSettings: TFormatSettings): TDateTime; overload; ...kennt sich jemand mit TFormatSettings aus?

HI

Der normale Befehl ist strtodatetime oder datetimetostr.
Meine Anmerkung ist aber das jenachdem was du mit der Zeit machen willst auf das Betriebssystem achten solltest!

Das heutige Datum lautet bei Win XP 02.02.2004 bei Win NT aber 02.02.04

Wie es bei den anderen Betriebssystemen wie Linux oder einem anderen Windows aussieht weis ich nicht.

Die variierende Jahreszahldarstellung ist für mich nicht relevant, da ich immer eine vierstellige Jahreszahl als Ausgangsstring habe... trotzdem Danke.

Kann mir keiner ein Beispiel eines TFormatStrings für 'yyyy-mm-dd hh:mm:ss' geben?

Gruß,
Steffen

Zitat von Michael Leyhe:

Das heutige Datum lautet bei Win XP 02.02.2004 bei Win NT aber 02.02.04

Ich bin mir ziemlich sicher, dass man es bei NT sich auch vierstellig anzeigen lassen kann, man muss es ur einstellen.

Ich habe das Problem jetzt so gelöst:

markieren

Delphi-Quellcode:

// Wandelt einen String im Format "yyyy-mm-dd hh:mm:ss" in DateTime-Wert um
function SQLDateTimeStringToDateTime(const strSQLDateTime : String) : TDateTime;
begin
  Result := StrToDateTime(copy(strSQLDateTime,9,2) + '.' + // Day
                          copy(strSQLDateTime,6,2) + '.' + // Month
                          copy(strSQLDateTime,0,4) + ' ' + // Year
                          copy(strSQLDateTime,12,8)) // Time
end;

Kennt jemand einen schnelleren/besseren Weg?

Gruß,
Steffen