Das OFFIZIELLE PROFAN SUPPORT FORUM
Einsteigerfragen
PROFAN-Programmierung
Helfer & Tools
Anregungen & Vorschläge
PROFAN-NEWS
Die Regeln!
2 - PROFAN-Programmierung

 Neues Thema  |  Zur Übersicht  |  Suchen  |  Einloggen   Vorherige Nachricht  |  Nächste Nachricht 
 Re: Zeitdifferenz berechnen
Autor: Heinz Brill (---.dip0.t-ipconnect.de)
Datum:   27.08.20 18:22

Hier noch eine Lösung :
 Cls
 ' Von Julian Schmidt
 ' https://xprofan.net/intl/de/forum/zeitabstaende-anhand-von-zeitstempeln-ausrechnen/#85699
 
 Def @Date(1) dt("setDateTime",val(substr$(@$(1),3,".")), val(substr$(@$(1),2,".")), val(substr$(@$(1),1,".")), val(substr$(substr$(@$(1),-1," "),1,":")), val(substr$(@$(1),2,":")), val(substr$(@$(1),3,":")), 0)
 Def @DTBetween(3) If(@$(1)="Year",1899,If(@$(1)="Month",12,If(@$(1)="Day",30,0)))-dt("get"+@$(1), @!(2)-@!(3))*If(@$(1)="Hour",-1,If(@$(1)="Min",-1,If(@$(1)="Sec",-1,1)))
 CLS
 Var Zeit1!=Date("24.12.2012 18:00:00")
 Var Zeit2!=Date("24.12.2012 14:10:00")
 
 print
 print DTBetween("Year",Zeit1!, Zeit2!);" Jahr(e)"
 print DTBetween("Month",Zeit1!, Zeit2!);" Monat(e)"
 print DTBetween("Day",Zeit1!, Zeit2!);" Tag(e)"
 print DTBetween("Hour",Zeit1!, Zeit2!);" Stunde(n)"
 print DTBetween("Min",Zeit1!, Zeit2!);" Minute(n)"
 print DTBetween("Sec",Zeit1!, Zeit2!);" Sekunde(n)"
 
 Waitkey


H.Brill
XProfan X4 + FreeProfan

 Beitrag beantworten  |  Foren-Liste  |  Alle Antworten   Neuerer Beitrag  |  Älteres Thema 

 Beiträge Autor  Datum
 Zeitdifferenz berechnen  Neu
Werner Wagner 24.08.20 19:20 
 Re: Zeitdifferenz berechnen  Neu
Arndt Lindner 25.08.20 08:33 
 Re: Zeitdifferenz berechnen  Neu
Werner Wagner 25.08.20 10:11 
 Re: Zeitdifferenz berechnen  Neu
Werner Wagner 25.08.20 11:00 
 Re: Zeitdifferenz berechnen  Neu
Arndt Lindner 25.08.20 17:17 
 Re: Zeitdifferenz berechnen  Neu
Michael Wodrich 26.08.20 15:18 
 Re: Zeitdifferenz berechnen  Neu
Werner Wagner 27.08.20 07:29 
 Re: Zeitdifferenz berechnen  Neu
Heinz Brill 27.08.20 18:22 


 Foren-Liste  |  Zur Registrierung 
 Benutzerlogin
 Benutzername:
 Passwort:
 Login-Daten speichern:
   
 Passwort vergessen?
E-Mail-Adresse oder Username unten eingeben. Dann wird Dir per e-Mail ein neues Passwort zugeschickt.

phorum.org