AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zeiten verrechnen

Ein Thema von TheMiller · begonnen am 17. Sep 2003 · letzter Beitrag vom 21. Sep 2003
Antwort Antwort
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#1

Zeiten verrechnen

  Alt 17. Sep 2003, 22:04
Hey.

das ist bestimmt eine dumme Frage, aber was ist daran falsch??
(Möchte die Differenz einer Uhrzeit mit der aktuellen Zeit haben)..

Ist bestimmt ganz leicht, aber ich raff's net. Das ist mein Versuch

Delphi-Quellcode:
var time1,time2:TTime;
var time3:ttime;
begin
time1:=strtotime(Edit1.Text);
edit1.Text:=timetostr(now);

time2:=strtotime(edit2.Text);

time3:=(time2-time1);
time3:=strtotime(Edit3.Text);
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Zeiten verrechnen

  Alt 17. Sep 2003, 22:35
Moin DJ-SPM,

was spricht gegen:

Edit1.Text := TimeToStr(StrToTime(Edit1.Text)-now); ?
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
Benutzerbild von thomasdrewermann
thomasdrewermann

Registriert seit: 8. Jun 2002
Ort: Herne
575 Beiträge
 
Delphi 3 Professional
 
#3

Re: Zeiten verrechnen

  Alt 17. Sep 2003, 22:39
Hallo DJ-SPM,
durch hast lediglich einen Fehler bei der Zuweisung und der Typenumwandlung gemacht.
Hier die Erläuterung deienes Quelltextes:
Delphi-Quellcode:
var time1,time2:TTime;
var time3:ttime;
begin
time1:=strtotime(Edit1.Text); //Du weist der Variabln time1 die in Edit1 eingegebene Uhrzeit zu OK!
edit1.Text:=timetostr(now); //Dann versuchst du jetzt die eingegebene Zeit in Edit1 mit der aktullen zu überschreiben ERR!
                              // Es müsste Edit2 zugewiesen werden
time2:=strtotime(edit2.Text); // Dann versuchst du aus dem mit "edit2" gefüllten Feld die aktuelle Zeit wieder einzulesen ERR!

time3:=(time2-time1); //Jetzt ermittelst du die Differenz
time3:=strtotime(Edit3.Text); //Hier versuchst du der schon mit der Differenz gefüllten Variabln Time3 eine In Edit3 eingegebene Zeit zuzuweisen
Hier das Richtige Beispiel:
Delphi-Quellcode:
Var time1,time2:TTime; //Es sind nur 2 Variabln nötig, denn now hat ja schon die akutelle Zeit!
begin
time1:=strtotime(edit1.text); // Die eingegebene Zeit einlesen
edit2.text:=timetostr(now); // Aktuelle Zeit ausgeben
time2:=now-time1; //Differenz ermitteln und Time2 zuweisen
edit3.text:=timetostr(time2); // Differenz in edit3 ausgeben
Voila

MFG
Thomas
Sport ist mord...
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#4

Re: Zeiten verrechnen

  Alt 17. Sep 2003, 22:44
Naja,

bekomme es jetzt net gebacken. Er rechnet die Zeit ja hoch. Die Differenz muss doch aber mit jeder Sekunde kleiner werden. Kanst du mir vielleicht morgen weiter helfen / oder auch jmd. anderes. Gehe jetzt erstmal ins Bett

Gute N8 an alle
  Mit Zitat antworten Zitat
Benutzerbild von thomasdrewermann
thomasdrewermann

Registriert seit: 8. Jun 2002
Ort: Herne
575 Beiträge
 
Delphi 3 Professional
 
#5

Re: Zeiten verrechnen

  Alt 17. Sep 2003, 22:48
Hi,
wenn du eine in der Vergangeheit liegende Zeit angiebst, dann wird der Abstand zwischen dem Zeitpunkt in der Vergangeheit und der fortschreitenden Zeit ja immer grösser statt kleiner!

Wenn du ein Zeitpunkt in der Zukunft angiebst rück dieser ja immer näher und der abstand wird immer kleiner.

MFG
Thomas
Sport ist mord...
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#6

Re: Zeiten verrechnen

  Alt 21. Sep 2003, 20:46
Also, irgendwie ist mir das echt zu hoch...

ich bekomme es nicht hin, dass ich ein Programm code, dass eine Zeit von z.B.: 08:35:00 und der jetzigen Zeit die Differenz berechnet und dann bis auf 0 runterzählt, da ja die verbleibende Zeit bis zur Zeit (08:35:00) immer kleiner und nicht größer wird.

Wer kann einem kleinen, begriffsstuzigen jungen Mann helfen???
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:35 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz