testversions zeit berechnen ?

[agm65]

hi leute, mal ne frage ..wie kann ich zB anhand des datums eine testversion checken ?

datetostr(dateof(now))) + 90 tage.

also mein progg soll 90 tage runter zählen, wie eine trial. wie kann man das möglichst sicher lösen ?

ich dachte ich speicher das start datum in einer db und rechne dann 90 tage drauf ? gibt es eine rechenoperation die mir das macht ?


gibts irgendwie eine funktion die mir mein gespeichertes date und das aktuelle datetostr(dateof(now))) vergleicht und mir die tage zurückgibt ?

[hoika]

Hallo,

komplett sicher geht gar nicht,
siehe die ganzen geknackten Programme im Netz.

Für einfaches Sachen:

Trunc(Date) sind Tage ab 30.12.1899 (oder so, is auch egal ;) )
mit Round(Trunc(Date)) ist das auch in Integer.

iCurDate := Round(Trunc(Date))-7;
iDate_Minus_7 := Round(Trunc(Date))-7;

Durch einfache Subtraktion erhälst du die Tagesdifferenz.


Heiko

PS: In DB speichern ist schon mal nen guter Anfang.

[agm65]

danke dir...

[Flare]

Zitat:

Zitat von hoika

iCurDate := Round(Trunc(Date))-7;

Also Round brauchst du nicht mehr, wenn du Trunc schon benutzt hast, das Ergebnis von Trunc ist schon ein Integer. Und was sich hoika mit iCurDate und dem -7 gedacht hat weiß ich auch nicht :gruebel:


Flare

[agm65]

ja, lol...hab ich schon verstanden ;) ... ohne round und die -7 weiss wohl echt nur er ;)

[hoika]

Ups ;)

was ja schon spät am Abend ...


Heiko