Как получить номер строки и столбца TStringGrid, на котором...

← →
Шурик Ш © (2004-01-12 16:20) [0]

Как получить номер строки и столбца TStringGrid, на котором нажата правая кнопка мыши и выбран пункт контекстного меню?

← →
pasha_golub © (2004-01-12 16:23) [1]

OnMouseDown+MouseToCell+F1

← →
GLFox (2004-01-12 16:25) [2]

Запоминай координаты - GetCursorPos() перед показом менюшки, по ним и найдешь свой Cell.

← →
Anatoly Podgoretsky © (2004-01-12 16:28) [3]

Row/Col

← →
Serge © (2004-01-12 16:29) [4]

Returns the column and row of the cell at the position with screen coordinates (X,Y).

procedure MouseToCell(X, Y: Integer; var ACol, ARow: Longint);

Description

Call MouseToCell to convert from grid-relative screen coordinates to row and column indexes. The X and Y parameters are the screen coordinates of the point to be converted. MouseToCell returns the ACol parameter as the number of the column over the point (X,Y), and the ARow parameter as the number of the row.

Usually the MouseToCell method is used in a mouse event handler, which supplies the mouse coordinates as the X and Y parameters of the method call.

← →
Шурик Ш © (2004-01-12 16:43) [5]

To GLFox (12.01.04 16:25) [2]
Дело в том что GetCursorPos() возвращает абсолютные координаты, а MouseToCell нужны относительные. А как получить их?

← →
Anatoly Podgoretsky © (2004-01-12 16:46) [6]

Так тебе не номер строки/колонки а координаты мыши, тогда ScreenToClient

Мне нужны номер строки/колонки, но конструкция:
procedure TDataForm.DataSGPopupMenuPopup(Sender: TObject); begin GetCursorPos(MCoord); end; procedure TDataForm.DeleteItemClick(Sender: TObject); var Col, Row: Longint; i,j: Integer; begin DataStringGrid.MouseToCell(MCoord.X, MCoord.Y, Col, Row); ... end;

присваивает Col = -1 и Row = -1.

Сказали же - ScreenToClient.

А про прямое получение координат строки и колонки в [3]

Как получить номер строки и столбца TStringGrid, на котором... Найти похожие ветки