有沒有方法可以使到stringgrid的fix column當被按下時,有一種像按button的感覺...因為我想做到當user按下grid最頂的column時,會sort (asc/desc) 那個column的data,有點像視窗按下某一個column的標題後,就會自動order...有方法嗎?

 Try this:
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  lCol, lRow: Integer;
  lRect: TRect;
begin
  StringGrid1.MouseToCell(X, Y, lCol, lRow);
  if not (lRow = 0) then
    begin
      Exit;
    end;
  lRect := StringGrid1.CellRect(lCol, lRow);
  DrawButtonFace(StringGrid1.Canvas, lRect, lRect.Right - lRect.Left, bsNew, True, False, False);
end;    procedure TForm1.StringGrid1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
  lCol, lRow: Integer;
  lRect: TRect;
begin
  StringGrid1.MouseToCell(X, Y, lCol, lRow);
  if not (lRow = 0) then
    begin
      Exit;
    end;
  lRect := StringGrid1.CellRect(lCol, lRow);
  DrawButtonFace(StringGrid1.Canvas, lRect, lRect.Right - lRect.Left, bsNew, True, True, False);
end; 

.