LitDev 1.2.24.0 DE
http://litdev.uk/LitDev.De.html Extension API

LD3DView LDArray LDBits LDBlueTooth LDCall
LDChart LDClient LDClipboard LDColours LDCommPort
LDController LDControls LDCursors LDDataBase LDDateTime
LDDebug LDDialogs LDDictionary LDEffect LDEmail
LDEncryption LDEvents LDFastArray LDFastShapes LDFigures
LDFile LDFocus LDftp LDGeography LDGraph
LDGraphicsWindow LDHashTable LDHID LDIcon LDImage
LDInline LDIOWarrior LDList LDLogic LDMath
LDMathX LDMatrix LDMusic LDNetwork LDPhysics
LDProcess LDQueue LDRegex LDResources LDScrollBars
LDSearch LDServer LDSettings LDShapes LDShell
LDSort LDSound LDSpeech LDStatistics LDStopwatch
LDText LDTextWindow LDTimer LDTranslate LDUnits
LDUtilities LDVector LDWaveForm LDWebCam LDWindows
LDxml LDZip

LDDateTime
Zeit- und Datumskonvertierungen.

Datumsformat ist zB. "25.01.2012 22:18:52" (DE) und hängt von lokalen Benutzereinstellungen ab.
Der Zeitteil ist optional.
Format für USA wäre zB. "01/25/2012 22:18:52".

Ein OADatum (Ole Automation Date) zeigt die Anzahl der Tage (incl. Teile angebrochener Tage), die seit Sa, 30.12.1899 00:00:00 vergangen sind.
Somit lassen sich Daten einfach addieren oder subtrahieren.


Add FromOADate GetDay
GetDayName GetHour GetMinute
GetMonth GetMonthName GetSecond
GetYear Now NowOADate
OADate Subtract ToOADate

Add(date,offset)
Ermittelt ein Datum aus einem angegebenen Datum und einem Zeitraum in Tagen.
date Das Kalenderdatum.
offset Der -/+ Zeitraum in Tagen.
returns Das Zieldatum, resultierend aus vorgegebenem Datum und gegebener Differenz an Tagen.

Datumsformat ist zB. "25.01.2012 22:18:52" (DE). Der Zeitteil ist optional.

example LDDateTime.Add("30.November 2011", 50)
Werden dem 30.November 2011 zB. 50 Tage hinzuaddiert, erhält man den 19.Januar 2012 (zB. als "19.01.12 00:00:00").


FromOADate(oaDate)
Konvertiert ein OADatum zu einem Kalenderdatum.
oaDate Das zu konvertierende OADatum (Vergangene und angebrochene Tage seit Sa, 30. Dez 1899 00:00).
returns Das Kalenderdatum.

Datumsformat ist zB. "25.01.2012 22:18:52" (DE). Der Zeitteil ist optional.
Der Datumsteil hängt von lokalen Einstellungen ab, für USA zB. "01/25/2012".

example FromOADate(0) ' "30.12.1899 00:00:00"

GetDay(oaDate)
Ermittelt die Tagnummer (im Monat) aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Tagnummer im Monat (1 bis 31).

GetDayName(oaDate)
Ermittelt den Wochentagname aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit Sa, 30. Dez 1899).
returns Der Wochentagname (zB. Montag).
example 'Kurzform, zB. Mo,Di,..,So
Text.GetSubText(LDDateTime.GetDayName(oa), 1,2)
'Starttag des OADatum
LDDateTime.GetDayName(0) 'Samstag


GetHour(oaDate)
Ermittelt die Stunde aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Stunde (0 bis 23).

GetMinute(oaDate)
Ermittelt die Minute aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Minute (0 bis 59).

GetMonth(oaDate)
Ermittelt die Monatsnummer aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Monatsnummer (1 bis 12).

GetMonthName(oaDate)
Ermittelt den Monatsname aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Der Monatsname (zB. Januar).
example 'Kurzform, zB. Jan,Feb,..,Dez
Text.GetSubText(LDDateTime.GetMonthName(oa), 1,3)


GetSecond(oaDate)
Ermittelt die Sekunde aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Sekunde (0 bis 59).

GetYear(oaDate)
Ermittelt die Jahreszahl aus einem OADatum (vergangene und angebrochene Tage seit 30. Dez 1899).
oaDate Das OADatum (Vergangene und angebrochene Tage seit 30. Dez 1899).
returns Die Jahreszahl (4-stellig).
example '2-stellig, zB. 14
Text.GetSubTextToEnd(LDDateTime.GetYear(oa), 3)


Now()
Ermittelt das aktuelle Datum und Uhrzeit.
returns Das aktuelle Datum und Uhrzeit [TT.MM.JJ hh:mm:ss].

Datumsformat ist zB. "25.01.2012 22:18:52" (DE), für USA zB. "01/25/2012 22:18:52")


NowOADate()
Ermittelt das OADatum für das aktuelle Datum (und Uhrzeit).
returns Die Anzahl der seit 30. Dez 1899 vergangenen und angebrochenen Tage [ttttt.ffffffffff].

OADate(year,month,day,hour,minute,second)
Ermittelt das OADatum (vergangene und angebrochene Tage seit Sa, 30. Dez 1899 00:00) aus einzelnen Datums- und Zeitangaben.
year Die Jahreszahl (als JJJJ, zB. 2014).
month Die Monatsnummer (zB. 4 od. 04).
day Die Tagnummer (zB. 4 od. 04).
hour Die Stunde (0 bis 23).
minute Die Minute (0 bis 59).
second Die Sekunde (0 bis 59).
returns Das OADatum (Vergangene und angebrochene Tage seit Sa, 30. Dez 1899 00:00).

Subtract(date1,date2)
Ermittelt die Anzahl der Tage zwischen zwei Kalenderdaten (Der Zeitteil ist optional).
date1 Das erste Kalenderdatum/-zeit (später).
date2 Das zweite Kalenderdatum/-zeit (früher).
returns Die Differenz als ganze und ev. angebrochene Tage (date1-date2). Für pos. Ergebnis, date1>date2 wählen.

ToOADate(date)
Konvertiert ein Kalenderdatum zu einem OADatum.
date Das zu konvertierende Datum (zB. Clock.Date, "02.8.14", "9.Aug 2014", "02.März.14", "7.1 2014" oder LDDateTime.Now)

Datumsformat ist zB. "25.01.2012 22:18:52" (DE). Der Zeitteil ist optional.
Der Datumsteil hängt von lokalen Einstellungen ab, für USA zB. "01/25/2012".

returns Das OADatum als Anzahl vergangener und angebrochener Tage seit Sa, 30. Dez 1899 00:00 bei Erfolg, sonst "" (und Fehlermeldung).
example ToOADate("30.12.1899 00:00:00") '0