ITabView.HitTestCell

Синтаксис

HitTestCell(X: Integer; Y: Integer; Var Row: Integer; Var Column: Integer);

Параметры

X. Координата Х;

Y. Координата Y;

Row. Переменная, в которую будет помещен индекс строки, содержащей точку с указанными координатами;

Column. Переменная, в которую будет помещен индекс столбца, содержащего точку с указанными координатами.

Описание

Метод HitTestCell вычисляет индексы строки и столбца для ячейки таблицы, содержащей точку, координаты которой передаются в качестве входных параметров X и Y.

Комментарии

Координаты X и Y можно получить любыми событиями таблицы, аргумент которого содержит свойство pPoint.

Вычисленные значения будут помещены в переменные, передаваемые в качестве параметров Row и Column.

Пример

Для выполнения примера предполагается наличие формы с компонентом TabSheetBox, использующим какой-либо источник данных. Данную процедуру необходимо назначить в качестве обработчика события OnMouseDown для компонента TabSheetBox.

Sub TabSheetBox1OnMouseDown(Sender: Object; Args: IMouseClickEventArgs);
Var
    TabS: ITabSheetBox;
    Sheet: ITabSheet;
    View: ITabView;
    Point: IPoint;
    Row, Column: Integer;
Begin
    TabS := Sender As ITabSheetBox;
    Sheet := TabS.Source.GetTabSheet;
    View := Sheet.View;
    Point := Args.pPoint;
    View.HitTestCell(Point.X, Point.Y, Row, Column);
    WinApplication.InformationBox("Строка: " + Row.ToString + "; Столбец: " + Column.ToString);
End Sub TabSheetBox1OnMouseDown;

После выполнения примера при щелчке мышью по ячейке компонента TabSheetBox будет выведено сообщение с индексами строки и столбца, содержащих данную ячейку.

См. также:

ITabView