HitTest(Pt: IPoint; Var Hit: HitTestResult): ITreeListNode;
Pt — точка, в которой можно получить имя элемента компонента.
Hit — параметр, содержащий дополнительную информацию.
Метод HitTest является расширением метода GetItemAt. После выполнении метода, параметр Hit будет содержать дополнительную информацию.
Sub TreeList1OnMouseDown(Sender: Object; Args: IMouseClickEventArgs);
Var
s: string;
Hit: HitTestResult;
TLN: ITreeListNode;
Begin
TLN := TreeList1.HitTest(Args.pPoint, Hit);
Select Case (Hit As Integer)
Case 1: s := "Nowhere";
Case 2: s := "OnItemIcon";
Case 4: s := "OnItemLabel";
Case 8: s := "OnItemIndent";
Case 16: s := "OnItemButton";
Case 32: s := "OnItemRight";
Case 64: s := "OnItemStateIcon";
Case 256: s := "Above";
Case 512: s := "Below";
Case 2048: s := "ToLeft";
Case 1024: s := "ToRight";
Else s := "OutSide";
End Select;
WinApplication.InformationBox(s);
End Sub TreeList1OnMouseDown;
После выполнения щелчка мышью в области элементов компонента TreeList1, появится сообщение, содержащее наименование области, в которой находится курсор мыши.
См. также: