StringGrid -> goEditing = FALSE -> Eine Spalte editierbar

[Helmi]

Hallo,

ich hab das mal so gelöst:

Delphi-Quellcode:

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
var
  StringGrid: TStringGrid;

begin
  //temporäres StringGrid
  StringGrid := Sender as TStringGrid;

  //Zellen-Editor ausschalten
  StringGrid.Options := StringGrid.Options - [goEditing];

  If ARow > 0 then
    //2. und 3. Spalte editierbar
    If ACol in [1, 2] then
      begin
        //Zellen-Editor einschalten
        StringGrid.Options := StringGrid.Options + [goEditing];
      end;
end;

In diesem Beispiel sind die 2. und 3. Spalte editierbar - das musst du dann an deine Wünsche anpassen.

Nebenbei bemerkt: "Klappt aber nicht" ist wie "Geht nicht" keine Fehlermeldung!