Einzelnen Beitrag anzeigen

Benutzerbild von glkgereon
glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge
 
#21

Re: Sekunden an einen Timer übergeben

  Alt 30. Aug 2004, 23:09
hmm, bei den eingabewerten hab ich auch einen fehler...moment

nein, ich will einfach das der timer nicht OnEdit3Change aktiviert wird sondern wenn der user aufn button klickt...

ahh, hier:
Delphi-Quellcode:
vorhanden:= strtofloat(Edit1.Text);
prostunde:= strtofloat(Edit2.Text);
benoetigt:= strtofloat(Edit3.Text);

dec(zeitsekunden);//runterzählen

fehlend:= benoetigt - vorhanden;
zeitstunden:= fehlend / prostunde;
zeitsekunden:= round(zeitstunden * 3600);//und dann wieder auf festen wert setzen
du musst das noch reintuen:

vorhanden:=vorhanden+round((zeitsekundenold-zeitsekunden)*prostunde/3600); nee, klappt auch nicht...

argghhh!!!

erst decrementierst du die zeitsekunden und dann sagst du
Delphi-Quellcode:
h:= zeitsekunden div (60 * 60);
zeitsekunden:= zeitsekunden - h*60*60;
m:= zeitsekunden div 60;
zeitsekunden:= zeitsekunden - m*60;
s:= zeitsekunden;
ich mach das mal neu...
»Unlösbare Probleme sind in der Regel schwierig...«
  Mit Zitat antworten Zitat