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...