Seite 1 von 1

Hilfe bei Uhrzeitanzeige

Verfasst: 16.10.2004 18:15
von sim0n
Kann mir jemand sage, wie ich die aktuelle Uhrzeit auf einem Fenster anzeigen kann, ohne das Fenster lahm zu legen??

So wird nämlich alles lahm gelegt:

Code: Alles auswählen

Repeat
  StartDrawing(WindowOutput())
  DrawText(Str(Hour(Date())) + " : " + Str(Minute(Date())) + " : " + Str(Second(Date())))
  StopDrawing()
ForEver 
Vielen Dank im vorraus!

Verfasst: 16.10.2004 18:22
von MVXA
is auch kein wunder :freak:

Code: Alles auswählen

Repeat
    EventID.l = WindowEvent()
    StartDrawing(WindowOutput())
    DrawText(Str(Hour(Date())) + " : " + Str(Minute(Date())) + " : " + Str(Second(Date())))
    StopDrawing()
    Delay(1)
Until EventID = #PB_Event_CloseWindow
das Delay stopt das programm für eine millisekunde. das gibt dem Prozessor und Windows zeit, andere aufgaben zu erledigen. WindowEvent() fragt ab, was der user mit dem Fenster gemacht hat. Das Until EventID = #PB_Event_CloseWindow bricht die Schleife ab, wenn der User das fenster geschlossen hat.

Verfasst: 16.10.2004 18:28
von sim0n
Dankeschön für die schnelle Hilfe! :allright: