Delphi-PRAXiS - Desktop-Uhr

Hallo,

hab' vor einiger zeit ein altes Projekt ausgekramt und meine Uhr in der Taskleiste ersetzt.

Benutzung :

Einstellungen der Uhr werden über Startparameter angegeben,
so daß keine Konfigurationsdatei (*.ini) benötigt wird.
Parameter :
1: Position - LEFT
2 : Position - TOP
3 : Alpha-Blend-Value : 0 .. 255
4 : Hintergrundfarbe

zu 1 und 2
Eintrag : -1 --> Position : ScreenCenter
-2 --> Position : DesktopCenter
Die reale Position wird auf der Uhr im Pop-Up-Menü angezeigt,
so dass nach dem Verschieben an die gewünschte Position die
Werte ausgelesen und in der Verknüpfung eingetragen werden können.

Beispiel :
...\Uhr.exe 939 951 160 $00613F5A --> ergibt den Screenshot im Anhang

...\Uhr.exe -1 -1 255 clBlack
--> ergibt die Positionierung in der Position ScreenCenter,
kein AlphaBlend-Effekt,
Hintergrund : schwarz,

mit der Farbe $00F832F8 wird der Hintergrund (unabhängig vom Alpha-Wert) transparent.

Umschaltung der Anzeige auf Datumsanzeige :
a) per Pop-Up-Menü
b) durch Klick auf die Punkte zwischen den Ziffern
automatische Rückstellung auf die Zeitanzeige nach 30 Sekunden.

Es wird keine weitere / explizite Prüfung der Startparameter auf Vollständigkeit
bzw. Sinn- oder Unsinnigkeit durchgeführt.