Delphi 7 : TStringGrid - программное выделение строки

[hexor_boo]

Всем привет!
Яндексую - пока не нашел решения.
Нужно выделить последнюю строку в Grid'e причем так, чтобы он до неё промотался (есть вертикальный скроллбар)

[hexor_boo]

Свойство TopRow не совсем подходит.
Нужно чтобы отображался список предыдущих строк. в том числе, а не только последняя,
т.е. в точности нужно повторить действие пользователя: промтал скроллбар вниз и выделил кликом последнюю строку.

[hexor_boo]

TStringGrid.Row:=N;

Где N - порядковый номер строки.

[macomics]

Уточните. Вам нужна плавная анимация прокрутки контента скроллером вниз?

[hexor_boo]

2 macomics, нет. Мне нужно чтобы после наполнения Grid'a строчками просто выбралась самая последняя в конченом состоянии: скролл промотан вниз, строка выделена (я ещё SetFocus добавил)

[macomics]

Тогда просто в цикле найдите индекс строки, которую стоит установить в TopRow

with StringGrid1 do begin
   h := ClientHeight;
   TopRow := 0;
   for i := RowCount - 1 downto 0 do
      if h > 0 then dec(h, RowHeights[i]) else begin
         TopRow := i;
         break;
      end;

Что-то вроде этого

ADD: Не знаю какая у вас версия компилятора (помню была Delphi 7). Но у меня на Lazarus под Linux, если просто присвоить TopRow := RowCount без вычета единицы, тогда срабатывает код подбора выделенной ячейки и они проматываются до последней строки (без анимации).

[DIONISKA]

with StringGrid1 do
  begin
    if RowCount>VisibleRowCount then
     begin
        TopRow:=(RowCount-VisibleRowCount);
        row:=pred(rowcount);
      end;
  end;

?