Frage zur mousemove Funktion!

[Delphieinsteiger]

Doch genau,ich möchte ja nur das sobald ich mit meiner mouse auf einer bestimmten Stelle meiner Paintbox bin, eine Gradzahl für das bestimmte Pixel auf mein Label erscheint.Die Paintbox hat eine Höhe von 500 Pixel und z.B auf Pixel 137 soll die Anzeige eine 13.7° ausgeben.Ist ja soweit auch kein Problem, meine Frage ist ja auch nur ob ich dazu jetzt wirklich 500 Befehle in meine Case anweisung schreiben muss oder ob es eleganter geht?