delphi выбор ячейки с помощью ScrollBar

[dol]

Здравствуйте!
Дана таблица StringGrid 10x10, и два ScrollBar вертикальный и горизонтальный.
При нажатии на ячейку таблицы вертикальный скроллбар занимает положение равное номеру строки, а горизонтальный равное столбцу.
Как сделать, чтобы можно было выбрать ячейку с помощью скроллбаров?
Т.е. передвигая вертикальный скролл выбираем номер строки, а горизонтальный номер столбца.

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
StringGrid1.Cells[ACol,Arow]:= IntToStr(ACol*ARow);
ScrollBar1.Position:= ARow;
ScrollBar2.Position:= ACol;
end;

procedure TForm1.ScrollBar1Change(Sender: TObject);
var j, i, z: integer;
begin
StringGrid1.Row:=ScrollBar1.Position; //вот тут не понимаю, как изменить номер строки
end;
procedure TForm1.ScrollBar2Change(Sender: TObject);
var j, i, z: integer;
begin
StringGrid1.Col:=ScrollBar2.Position; // то же самое со столбцом
end;

[digitalis]

А количество стр.-столб. фиксированное ? Тогда можно перед началом работы откалиброваться: кликнуть в левую верхнюю ячейку и правую нижнюю, запомнить. И тогда методом интерполяции.
Наверно, есть менее экзотические способы - гуру подскажут.

[dol]

Не понимаю в чем была ошибка, попробовал сначала все сделать то же самое и заработало.

procedure TForm1.ScrollBar1Change(Sender: TObject);
begin
StringGrid1.Row := ScrollBar1.Position;
end;

procedure TForm1.ScrollBar2Change(Sender: TObject);
begin
StringGrid1.Col := ScrollBar2.Position;
end;

Этого оказалось достаточно, можно закрывать тему