Wiedermal Analoge Uhr :)

[Khabarakh]

Ich war mir nicht sicher, ob der Code von ihm ist, deshalb wollte ich lieber nichts sagen .
Jedenfalls ist das noch kein wirkliches OOP-Konzept und mit pmXor stößt man schnell an dessen Grenzen, überhaupt ist es doch viel umständlicher als ein TBitmap.

Und ob man den Code auf eine Uhr übertragen kann...

Eigentlich ist das Problem doch einfach: Nur die Sekunden/Minuten in Winkel umrechnen:

Delphi-Quellcode:

// Sekundenzeiger
// Bogenmaß und y-Achse nach unten
alpha := -Pi / 2 + sek / 60 * 2 * Pi;
// Minutenzeiger
alpha := -Pi / 2 + min / 60 * 2 * Pi + sek / 60 * 2 * Pi / 60;