Wenn Mouse über kreis, dann Mouse ändern

[Matze]

Da du die Koordinaten hast, kannst du mit GetCursorPos überprüfen, wo sich der Cursoer befindet. Wenn er da ist, wo er sein Corsor ändern soll, änderst du ihn halt.

Edit: Hatte Käse geschrieben...


Nachtrag:

Oder mach's so:

Delphi-Quellcode:

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if (x >= 4) and (x >= 6) and
     (y >= 4) and (y <= 6) then
       Cursor := crCross else
         Cursor := crArrow;
end;

Jetzt wird der Cursor verändert, wenn er sich bei Position 5/5 befindet oder an einem der angrenzenden Pixel.