StringGrid -> GoEditing

[Hawkeye219]

Hallo,

du kannst in der Behandlungsroutine für das Ereignis TStringGrid.OnSelectCell das Flag goEditing setzen oder löschen:

Delphi-Quellcode:

procedure TForm1.Grid1SelectCell (Sender: TObject; ACol, ARow: Integer;
  var CanSelect: Boolean);
begin
  if ((ACol = 3) and (ARow = 4)) then
    Grid1.Options := Grid1.Options - [goEditing]
  else
    Grid1.Options := Grid1.Options + [goEditing];
end;

Gruß Hawkeye