Italia
Foro

Datumsvergleich

 

Thomas
Freier
Aiuto! Irgendwie bekomme ich es nicht hin nach der Beschreibung in der X2 Aiuto. Bekomme immer 1 zurück.
KompilierenMarkierenSeparieren
cls
var Dat&=@Create("DateEdit", %hwnd,"Datum",100,100,94,20)
print "0 = Datum id. , -1 = Datum kleiner , 1 = Datum größer"
SetFocus(Dat&)

while 0=0

    GetMessage
    locate 4,0
    print @GetText$(DAT&)
    print @dt("getDate",0)
    print
    print dt("CompareDate", @GetText$(DAT&),@dt("getDate",0))'Datum nach Heute?

EndWhile

End
 
Gruß Thomas
Windows XP SP2, XProfan X2
23.06.2011  
 




RGH
Hallo Thomas,

bei der Funktion "CompareDate" müssen beide Parameter als Zeitpunkte (=Fließkommawerte) vorliegen. In Deinem Beispiel ist der zweite Parameter aber ein String. Das kann also nicht richtig funktionieren.

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
23.06.2011  
 




Thomas
Freier
Hallo Roland,
aber wie ist es dann richtig? Ich steh da schon eine Weile vorm Berg.
 
Gruß Thomas
Windows XP SP2, XProfan X2
23.06.2011  
 




RGH
Ciao,
mitz d! = dt("SetDate", S$) kannst Du einer Fließkommavariablen einen entsprechendenden Zeitpunkt zuweisen. Und S$ kann durchaus das Ergebnis von getText$(Dat&) sein, also in Deinem, Fall dt("SetDate", getText$(Dat&)).

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
23.06.2011  
 




Thomas
Freier
Also so?
KompilierenMarkierenSeparieren
cls
var Dat&=@Create("DateEdit", %hwnd,"Datum",100,100,94,20)
print "0 = Datum id. , -1 = Datum kleiner , 1 = Datum größer"
SetFocus(Dat&)

while 0=0

    GetMessage
    locate 4,0
    print @GetText$(DAT&)
    print @dt("getDate",0)
    print
    print dt("CompareDate", @dt("setDate", getText$(Dat&)),@dt("getDate",0))'Datum nach Heute?

EndWhile

End

Zeigt bei mir immer noch 1 an.
 
Gruß Thomas
Windows XP SP2, XProfan X2
23.06.2011  
 




RGH
Hallo Thomas,
Du solltest wirklich einen Blick in die Aiuto werfen: auch dt("getDate", 0) gibt einen String zurück und nicht einen Zeitpunkt. Der Aiuto zu "CompareDate" ist aber zu entnehmen, dass beide Parameter Zeitpunkte (Fließkommawerte) sein müssen!
Du könntest naturalmente auch hier aus dem String mittels "setDate" einen Zeitpunkt machen, aber noch einfacher ermittelst Du den aktuellen Zeitpunkt mit der Systemvariable !Now.
KompilierenMarkierenSeparieren
...
print dt("CompareDate", @dt("setDate", getText$(Dat&)), !Now)
.
re>

... und schon klappt es!

Saluto
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
23.06.2011  
 




Thomas
Freier
Roland,
Danke so gehts. Der Vorspann hatte mich wohl irretiert: Hinweis auf den zweiten Parameter....dann den ersten umgewandelt und jetzt waren beide ein String und damit falsch. Hoffe, ich habs jetzt drauf.
 
Gruß Thomas
Windows XP SP2, XProfan X2
24.06.2011  
 



Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

3.740 Views

Untitledvor 0 min.
H.Brill09.10.2021
Torben Nissen16.04.2021
Walter23.10.2019
Jörg Sellmeyer17.08.2017
Di più...

Themeninformationen

Dieses Thema hat 2 subscriber:

Thomas Freier (4x)
RGH (3x)


Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie