function IntegerToDate(const Date: Integer): TDateTime

» Startseite » netFrame als Plattform Menü » Globale Methoden | » Erweiterte Suche

netFrame-Syntax:

function IntegerToDate(const Date: Integer): TDateTime

Beschreibung:

IntegerToDate wandelt ein Domizil Datumsformat in ein echtes Datumsformat von Delphi um.
Sollte die Funktion das Datum nicht umwandeln können dann wird 0 zurückgegeben was dem Datum: 30.12.1899 12.00 Uhr entspricht
In Domizil wird das Format yyyymmdd verwendet. (20051231)

Beispiel:


procedure checkdate(aValue: integer);
  var
  aDate: TDateTime;
begin
  aDate := IntegerToDate(aValue);
  message_dlg(FormatDateTime('dd.mm.yyyy', aDate));
end;