Wie kann ich bei einer StopUhr die Millisekunden anzeigen......Help!!!!!



  • Hi folk's,
    ich versuche für einen Carrerarundenzähler ein Programm zu schreiben wo mir immer die Aktuellen Rundenzeiten in einer Tabelle geschrieben werden ,nur schaffe ich es nicht die Millisekunden unter Borland 6 Prof. zu erzeugen .
    Hier ein kurzer ausschnitt aus den Programm was aber für den Timer zuständig ist.

    _fastcall TfrmSlotcar::TfrmSlotcar(TComponent* Owner)
    : TForm(Owner)
    {
    Timer3->Enabled =false;
    Stopuhr->Caption = "00:00:00";
    }
    //---------------------------------------------------------------------------
    void __fastcall TfrmSlotcar::Start1Click(TObject *Sender)
    {
    StartZeit = Time();
    Timer3->Enabled =true;
    }
    //---------------------------------------------------------------------------
    void __fastcall TfrmSlotcar::Timer3Timer(TObject *Sender)
    {
    Stopuhr->Caption = Time() - StartZeit;
    }
    //---------------------------------------------------------------------------
    void __fastcall TfrmSlotcar::Rcksetzen1Click(TObject *Sender)
    {
    if(Timer3->Enabled == true)
    {Timer3->Enabled = false;// Beim 1 Click wird Angehalten der Timer und erst
    } // beim 2 Click wird die Anzeige zurück auf 00:00:00
    // gesetzt.
    else{ Stopuhr->Caption ="00:00:00";
    }
    }
    //---------------------------------------------------------------------------

    Stopuhr ist mein Labelanzeige...

    Kann mir einer helfen ..... 😃
    grüße olaf.



  • Ich befürchte, da mußt Du statt TDateTime den TickCount benutzen:

    DWORD dwStartZeit = GetTickCount();
    
    ...
    
    DWORD dwGesamtZeit = GetTickCount() - dwStartZeit;
    BYTE byMinuten = dwGesamtZeit / 60000;
    BYTE bySekunden = (dwGesamtZeit / 1000) % 60;
    WORD wMilliSekunden = dwGesamtZeit % 1000;
    

    In etwa so.


Anmelden zum Antworten