нужна помощь по GetHitTest

Всем привет.
При перетаскивании строки в cxGrid хочу получить index строки, над которой находится курсор.
в DragDrop делаю так:

HitTest := TcxGridSite(Sender).ViewInfo.GetHitTest(Point(X,Y));
ItemIndex:= TcxGridRecordCellHitTest(HitTest).GridRecord.RecordIndex;

но GetHitTest объект не возвращает.
Не пойму, в чём проблема.

Что за X-Y. Может стоит преобразовать ?

DimaBr,
по доке это координаты гридкантрола.

ну пробовал использовать ScreenToClient, да вот смысла в этом ноль. там координаты явно cxgrid.

Прекрасно работает и без преобразования

procedure TForm1.cxGridTableView1DragDrop(Sender, Source: TObject; X, Y: Integer);
var HitTest: TcxCustomGridHitTest;
begin
  HitTest := TcxGridSite(Sender).ViewInfo.GetHitTest(Point(X,Y));
  if HitTest is TcxGridRecordCellHitTest
    then caption := inttostr(TcxGridRecordCellHitTest(HitTest).GridRecord.RecordIndex)
    else caption := 'none'
end;

да, да, что-то тупил вчера.
Спасибо за внимание.