안녕하세요...

저는 걍 팝업 메뉴를 연결하면 될 것 같은데요..

그럼 즐프하세염..

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Grids, Menus;

type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    PopupMenu1: TPopupMenu;
    N1: TMenuItem;
    procedure StringGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);
    procedure StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
      var CanSelect: Boolean);
    procedure StringGrid1MouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1                        : TForm1;
  ci_row,ci_col,MouseX,MouseY  : Integer;

implementation

{$R *.DFM}

procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
begin
     MouseX := X;
     MouseY := Y;
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
     ci_row := Arow;
     ci_col := Acol;
end;

procedure TForm1.StringGrid1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
  Pos   : TPoint;
  iCol,
  iRow  : Integer;
begin
  StringGrid1.MouseToCell(MouseX,MouseY,iCol,iRow);
  if (Button = mbRight) then   begin  // 마우스 오른쪽버튼이 눌렸다면.popUp ..
      GetCursorPos(Pos);
      PopupMenu1.Popup(Pos.X, Pos.Y);
  end;
end;

end.

예제 올립니다....