Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#15

AW: Aktuelles Datum in die DB speichern?

  Alt 28. Feb 2013, 14:53
Evt. gibts da einen viel einfacheren Weg bzw. die diversen DBS bieten spezielle Funktionalitäten an, jedoch hatte ich damals nichts für SQLite gefunden, womit ich zufrieden war.
Im Anhang ist ne kleine Unit, die DateTime zu nem Integer konvertiert.
aus 28.02.2013 wird 20130228 (yyyymmdd)
aus 14:49:50 wird 144950 (ohne ":")

Delphi-Quellcode:
var
  encodedTime: Int64;
begin
  encodedTime := encodeDateTime(Now); // den Inhalt dieser Variable kannst du einfach in die DB speichern

  ShowMessage(formatDecodedTime(DecodeDateTime_Time(encodedTime)));
  ShowMessage(formatDecodedDate(DecodeDateTime_Date(encodedTime)));
end;
Angehängte Dateien
Dateityp: pas aphtonStringDate.pas (1,9 KB, 5x aufgerufen)
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat