Du bist nicht angemeldet.
Lieber Besucher, herzlich willkommen bei: Aqua Computer Forum. Falls dies dein erster Besuch auf dieser Seite ist, lese dir bitte die Hilfe durch. Dort wird dir die Bedienung dieser Seite näher erläutert. Darüber hinaus solltest du dich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutze das Registrierungsformular, um dich zu registrieren oder informiere dich ausführlich über den Registrierungsvorgang. Falls du dich bereits zu einem früheren Zeitpunkt registriert hast, kannst du dich hier anmelden.
Zitat von »moe«
zu isdn zeiten hatte ich mir auch einen zeitzähler programmiert, der je nach monatslänge die zeit korrekt rückwärtszählend anzeigte.
im netz wirst du kaum etwas gutes finden, wo nicht etwas dafür verlangt wird.... und ich hab damals ewig gesucht -> letztendlich gab ich auf und hab mich selbst dran gemacht.
für was möchtest du den timer einsetzen und was genau soll er protokollieren?
A64 NC3500+ 939 zu verkauZitat
* We die only once, and for such a long time. *Moliere*
Zitat von »Cyrotech«
Ich habe hier ein kleines Tool, was cobra geschrieben hat. Wenn Du es haben willst, KM an mich.
Quellcode |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Option Explicit Private Declare Function GetTickCount Lib "kernel32" () As Long Private Sub Timer1_Timer() Dim H As Single, M As Single, S As Single, MS As Single Dim strH$, strM$, strS$, strMS$ MS = GetTickCount() MS = MS / 1000 H = Int(MS / 3600) MS = MS - H * 3600 M = Int(MS / 60) MS = MS - M * 60 S = Int(MS) MS = Int((MS - S) * 10) strH = CStr(H) strM = Format(CStr(M), "##00") strS = Format(CStr(S), "##00") strMS = CStr(MS) Label1.Caption = strH & ":" & strM & ":" & strS & ":" & strMS End Sub |
-