HINT - ListView

Mam w programie ListView jak zrobić, zeby przy najeżdżaniu myszką na każdą z pozycji listy pokazywał się HINT własnie o tej pozycji?

JediVCL->JvListView. Równierz torry.net->tips

W zwykłym ListView:

procedure TForm1.ListView1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
 i:TListItem;
begin
  i:=ListView1.GetItemAt(X,Y);
  ListView1.ShowHint:=(i<>nil);
  if i<>nil then ListView1.Hint:=i.Caption;
end;