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;