Как отображать элемент поверх курсора ?

[Kochevnik]

Делаю примитивную игрушку, нужно чтобы прицел двигался точно за курсором. Проблема в том, что когда курсор выходит на картинку с прицелом прицел намертво замирает. Ка можно сделать чтобы image отображался поверх курсора ?

[mihali4]

Попробуйте скрывать курсор на картинке:

Image.Cursor:=crNone;

[Kochevnik]

нет, кусор скрыт
мне надо чтобы прицел следовал точно за курсором

[mihali4]

Приведите кусок кода, где вы обрабатываете движение мышки...

[Kochevnik]

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
gx:=x;
gy:=y;
image2.top:=y-110;
image2.left:=x-110;
end;

проблема в том, когда курсор на image2 то он не двигается, как только курсор выходит за придел image2 то прицел моментом прыгает к курсору

Разница в оформлении понятна ?
Прощается только один раз. Если правила не будут прочитаны и не будут соблюдаться, то - "красный террор"

[mihali4]

Поместите Image на Panel. Опишите обработчик для нажатия ЛКМ:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Sender:=Image1.Parent;
(Sender as TPanel).Perform(WM_SysCommand,$F012,0);
end;

Теперь при нажатой кнопке мышки вы можете таскать прицел-Image куда угодно.
ЛКМ нужно нажать на Image.

[Пепел Феникса]

а может проще создать свой курсор и применить его к приложению?