Обрашение к фиксированным ячейкам

[Лубышев]

Есть объект TstringGrid
Мне нужно прикрепить код по сортировки по нажатию на верхнюю фиксированную ячейку... не знаю как.

[alexBlack]

Наверное имеется в виду вот это:

procedure TForm1.StringGrid1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var P : TGridCoord;
begin
   P := StringGrid1.MouseCoord(X, Y);
   if (P.Y = 0) or (P.X = 0)
   then label1.Caption := 'fixed'
   else label1.Caption := 'non fixed'
end;