Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
22. Sep 2004
ja, ich setzt lasttime ma auf jetzt, gute idee :thumb:
timer 2 läuft in 5s-intervallen, wollt ich aber auf 1s verkürzen...
*_da nach extended.... :gruebel: wär zu überlegen, wird getestet!!
was is redundanz???
Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
22. Sep 2004
aber der wert si komisch, denn wenn ich meine werte geladen hab, dann springt der wert einal um roesig viel, und dann is ende
ich poste mal mehr von meinem code...
var
Form1: TForm1;
needed, lasttime:TDateTime;
m_da, k_da, t_da:integer;
m_need, k_need, t_need:integer;
m_prod, k_prod, t_prod:integer;
Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
22. Sep 2004
also statt dem
t_da:=t_da+round(t_prod/(jetzt-lasttime));
das
t_da:=t_da+round(jetzt-lasttime)*t_prod*24*12;
richtig so?
Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
21. Sep 2004
hi
ich hab einen timer, und jede sekunde soll eine menge, die jede stunde um eine bestimmte menge steigt hochgezählt werden
ich wollte das so machen:
procedure TForm1.Timer2Timer(Sender: TObject);
var jetzt:TDatetime;
begin
jetzt:=now;