fixierte zelle eines grids abfangen

[n00b2key]

ich möchte, dass wenn der user oben auf eine fixierte zelle clickt, dass er das grid nach der spalte sortiert. die proceduren habe ich alle fertig nur weiss ich nicht wie man das clicken auf eine fixierte zelle abfangen kann.

das ist 1 versuch:

Code:

procedure Trechnung_anschauen_form.StringGrid1SelectCell(Sender: TObject;
  ACol, ARow: Integer; var CanSelect: Boolean);
begin
if ARow = 0 then
begin
  StringGrid1.Options := StringGrid1.Options -[goRowSelect];
  Case ACol of
    0:SortIntGrid(StringGrid1, 0);
    1:SortStringGrid(StringGrid1, 1);
    2:SortStringGrid(StringGrid1, 2);
    3:SortStringGrid(StringGrid1, 3);
    4:SortStringGrid(StringGrid1, 4);
  end;
end;
end;