Por ejemplo, fila 5 y columna 7:
Código Delphi
[-]procedure TFInsertarAsientoInteligente.grXXXSelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
begin
if (ARow=5) and (ACol=7] then
grXXX.Options := grXXX.Options + [goEditing]
else
grXXX.Options := grXXX.Options - [goEditing];
end;