forum.boolean.name - Аналог Edit.SelStart для StringGrid

forum.boolean.name (http://forum.boolean.name/index.php)

- Delphi (http://forum.boolean.name/forumdisplay.php?f=66)

- - Аналог Edit.SelStart для StringGrid (http://forum.boolean.name/showthread.php?t=5561)

Trilliput

12.01.2008 16:48

Аналог Edit.SelStart для StringGrid

Нужен аналог Edit.SelStart для StringGrid. Те необходимо узнать положение курсора в редактируемый ячейке таблицы.

HolyDel

14.01.2008 11:30

Ответ: Аналог Edit.SelStart для StringGrid

создай событие: OnSelectCell для TStringGrid.
пропиши в нем ето:

Код:

ShowMessage('строка:'+inttostr(ACol)+' столбец:'+inttostr(ARow));

дальше любуйся.

если же тебе надо просто узнать, какая ячейка выделена, то вот:

Код:

ShowMessage('строка:'+inttostr(StringGrid1.Col)+' столбец:'+inttostr(StringGrid1.Row));

Trilliput

14.01.2008 11:53

Ответ: Аналог Edit.SelStart для StringGrid

немного неправильно выразился. Нужно узнать положение каретки в inplace editor когда редактируют содержимое ячейки.
Но решение уже нашел:
type
TGridCracker = class(TStringGrid);
....
....
function GetCaretPosition(Grid: TStringGrid): Integer;
begin
with TGridCracker(Grid) do
Result := InplaceEditor.SelStart;
end;

Часовой пояс GMT +4, время: 15:02.