Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Zeitfunktion springt

    Delphi
    by Hedge, 17. Nov 2009
  Ja genau daran habe ich auch gedacht.
  
  Ist jetzt auch nicht DIE weltbewegende Funktion, aber gibt es Varianten zum TTimer?
• Forum: Object-Pascal / Delphi-Language

  Zeitfunktion springt

    Delphi
    by Hedge, 17. Nov 2009
  Ich lasse einen Timer laufen der alle 500 Sekunden mit folgender Funktion an 2 Labeln eine Zeit übergibt:
  
  function FormatTime(ZeitDifferenz:UInt64): String;
  var
  iSekunden,iMinuten,iStunden:UInt64;
  begin
  Zeitdifferenz:=Ceil(ZeitDifferenz div 1000);
  iSekunden:=ZeitDifferenz mod 60;
  ZeitDifferenz:=trunc(ZeitDifferenz / 60);
  iMinuten:=ZeitDifferenz mod 60;