TIME TO SAY GOODBYE

[bobobo]

nochmal ein angepasster der mit zahlen auf den bildschirm die dann aber gleich wieder weglöscht und dabei rumpiept

Code: Alles auswählen

LoadFont(0,"",32)
Debug ElapsedMilliseconds()
Time$ = FormatDate("%hh:%ii",Date()-ElapsedMilliseconds()/1000+(3600*8))
Time$=FormatDate("%hh:%ii",Date())
ExamineDesktops()
w=DesktopWidth(0):h=DesktopHeight(0) ;
tw=30;428 ;textwidth (gemessen)
th=120 ;textheight(gemessen)


del=333
del=33
ro.l=235:go.l=80:bo.l=80
;r=82:g=111:b=bo
py=h-th
For i=0 To 300
FreeFont(0)
  LoadFont(0,"",Random(22)+10)
  hdc = GetWindowDC_(GetShellWindow_())
  SelectObject_(hdc,FontID(0))
  SetBkMode_(hdc,#TRANSPARENT)
  ;r=153+Random(43):g=64+Random(43):b=64+Random(43)
  
  ;r=ro-8+Random(16):g=go-8+Random(16):b=bo-8+Random(15)
  r=ro-20+Random(40):g=go-20+Random(40):b=bo-20+Random(40)
  
  px=Random(w-tw):py=h-th:py=Random(50)+(h-th-50);:py=h-th
  
  ;For t=2 To 1 Step -1
  ;  Debug Str(r-r*5)+" "+Str(g-r*5)+" "+Str(b-r*5)
  ;  SetTextColor_(hdc,RGB(r-t*8,g-t*8,b-t*8))
  ;  TextOut_(hdc,px+t,py+t,Time$,5)
  ;Next t
  SetTextColor_(hdc,#Black)
  TextOut_(hdc,px+1,py+1,Time$,5)
  Select Random(2)
  Case 0
  SetTextColor_(hdc,#Yellow)
  Case 1
  SetTextColor_(hdc,#Red)
  Case 2
  SetTextColor_(hdc,#Green)
  EndSelect
  TextOut_(hdc,px,py,Time$,5)
  
  
  ;ReleaseDC_(GetShellWindow_(),hdc)
  ;InvalidateRect_(65700,0,0)    brauch gar nich
  For iv=256*256 To 256*256+512
    InvalidateRect_(iv,0,0)   ;Soll den Rest bereinigen (iconebene was auch immer)
  Next iv
  ;del+33
  
  del+33
  del =1
  Debug del
  Beep_(Random(200)+400,100)
  ReleaseDC_(GetShellWindow_(),hdc)
  Delay(del)
Next

[Axolotl]

Ja, man kann auch ein Fenster dazwischen fummeln. So wie in der Demo hier:
Draw to Desktop behind the Icons

[bobobo]

ja geht . allerdings dreht der am Iconfont rum meier ist normalerweise unschattiert und recht schwarz (oder weiß, je nach der ausgewählten Hinterngrundfarbe). das Programm macht da diesen extrem hässlichen weißen Font mit der Schattierung draus.

[dige]

nochmal ein angepasster der mit zahlen auf den bildschirm die dann aber gleich wieder weglöscht und dabei rumpiept

Lustig Allerdings befürchte ich, dass ich den Wecker einfach nur so schnell wie möglich ausmachen will und dann doch einfach weiterarbeite

[bobobo]

Kenn ich, das mach auch immer eo