Mauskoordinaten (X,Y) in Grad umrechnen?

[Namenloser]

Delphi-Quellcode:

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
Var
A: double; // double statt integer -> Gleitkommazahl
begin
A := ArcTan2(Y, X);
Caption := FloatToStr(A*180/pi);
{ Wenn du keine Kommazahlen willst: 
Caption := IntToStr(trunc(A*180/pi));
}
end;

Für Gleitkommazahlen musst du FloattoStr oder FloatToStrF verwenden.
Mit *pi/180 wird die Zahl ins Gradmaß umgerechnet, da du sonst eine etwas unhandliche Zahl im Bogenmaß erhälst.