StringGrid i zaznaczanie

Witam

Mam mały problem z komponentem stringGrid.
Przeszukałem chyba cały internet i nie znalazłem.

Potrzebowałbym zaznaczać myszką jakiś obszar w stringGrid.
Wystarczy ze po kliknieciu w button wyswietli się w np ShowMessage() zakres jaki został zaznaczony myszką (dalej sobie juz poradzę).

Bardzo proszę o jakieś podpowiedzi, linki, lub moze któtki kod.

Dzięki wielkie i pozdrawiam.

procedure TForm1.Button1Click(Sender: TObject);
var
x,y: integer;
begin
x:= StringGrid1.Selection.BottomRight.X- StringGrid1.Selection.TopLeft.X+ 1;
y:= StringGrid1.Selection.BottomRight.Y- StringGrid1.Selection.TopLeft.Y+ 1;
form1.Caption:= inttostr(X)+'x'+inttostr(Y);
end;

oto ci chodzi ?