Forum: Object-Pascal / Delphi-Language
by alfold,
8. Sep 2015
Man bin ich blind!!!!!!
Ich verwende in meinem Programm schon die ganze Zeit Doublewerte als Zeitangaben.
duration:= StrToFloat(Edit1.Text) / (24 * 3600);
FormatDateTime('hh:nn:ss:zzz', duration);
Genau an der Stelle bei der Übergabe vom TextFeld hab ich dies "/ (24 * 3600)" schlicht vergessen!:wall:
Und siehe da: 'Nun klappt es auch mit der Nachbarin':wink:
Danke euch :thumb:
Forum: Object-Pascal / Delphi-Language
by alfold,
7. Sep 2015
Das Eingabefeld soll die Zeit sein in sec und millisec, also 120,500sec oder 10,000 sec, oder 0,500sec usw.
Und dieser Wert soll als Zeitvorgabe dienen.
gruss
Forum: Object-Pascal / Delphi-Language
by alfold,
7. Sep 2015
Jo, ändert aber nichts an der Tatsache.
Wenn ich 10,000 im Eingabefeld eingebe, darf nach der Umrechnung nicht 8 rauskommen.
Also muss da irgend was Falsch sein.
Ich Teste das ja schon seit Tagen und lass mir die einzelnen Parameter im Label Anzeigen. Nur die Umrechnung hab ich nie getestet und demzufolge jetzt erst bemerkt.
gruss
Forum: Object-Pascal / Delphi-Language
by alfold,
7. Sep 2015
Dreiersatz.... da war doch mal was vor 40 Jahren.:wink:
Spass bei Seite.
Die Umrechnung vom Eingabefeld stimmt nicht!
Wenn '10,000' drin steht kommt ein anderer Wert bei der Ausgabe an!?
duration:= StrToFloat(Edit1.Text) / 100000;
Label7.Caption:= FormatDateTime('hh:nn:ss:zzz', duration);
Ausgabe 00:00:08:625 !
Wo liegt denn nun da der Fehler?:wall:
Forum: Object-Pascal / Delphi-Language
by alfold,
7. Sep 2015
Wie kommt man auf so eine Formel? :shock:
Ich nie und nimmer!!!!
Funct so weit so gut.
Einen Makel gibt es noch. Wenn die Zeit < 1sec ist, erreich er die endpos nicht.
Bei allen anderen Zeitwerten > 1sec wird die endpos vor der eingegebenen Zeit erreicht. Je grösser der Zeitwert je grösser die Differenz.:gruebel:
"Ist allerdings bei meinem Konstrukt auch, was die Zeiten betrifft."
...
Forum: Object-Pascal / Delphi-Language
by alfold,
7. Sep 2015
Hi, irgendwie hänge ich seit Tagen daran und finde keine Lösung!
Der Slider der Trackbar, soll von Max zu einer vorgegebenen Position in einer Vorgegeben Zeit sich bewegen!
Irgend wie stimmt da an der Formel was nicht oder im Timer!
noch zur Info:
Trackbar.Max:= 70;
Timer:= 17;
Der Slider bewegt sich ,kommt aber nie an seiner vorgegebenen Position an!
Vielleicht könnt ihr mir Helfen und...
