mira no pude hacer andar el boton dentro del tstringgrid con el codigo que me enviaste, use el siguiente y anda bien, puede ser otra alternativa:
Este codigo lo utilice en el evento SelectCell del tstringgrid
Código Delphi
[-]
var
R: TRect;
begin
R := sgdWork_Sheet_Data.CellRect(ACol, ARow);
R.Left := R.Left + sgdWork_Sheet_Data.Left;
R.Right := R.Right + sgdWork_Sheet_Data.Left;
R.Top := R.Top + sgdWork_Sheet_Data.Top;
R.Bottom := R.Bottom + sgdWork_Sheet_Data.Top;
btnMemo.Width := 16;
btnMemo.Left := R.Right - btnMemo.Width + 2;
btnMemo.Top := R.Top + 2;
btnMemo.Height := (R.Bottom) - R.Top;
btnMemo.Visible := True;
btnMemo.SetFocus;
end;