DBGrid in dem man einer Row ReadOnly zuweisen kann

[sega84]

Hallo zusammen,
habe momentan ein kleines Problem und weiß noch nicht wie ich es lösen soll. Vielleicht habt ihr ja eine Idee:
Es wird ein DBGrid verwendet.
Einige Rows dürfen beschrieben werden, andere aber nicht. In der zugehörigen Tabelle gibt es ein Feld: ReadOnly (Boolean), wenn dieses Feld "true" ist, dann darf der Datensatz nur gelesen werden und nicht geändert werden. Gibt es dort eine möglichkeit, es mit dem normalen TDBGrid zu lösen.
Danke für eure Mithilfe...

[nahpets]

Hallo,

wie wäre es damit?

Delphi-Quellcode:

procedure TForm1.ADOTable1BeforeEdit(DataSet: TDataSet);
begin
  DBGrid1.ReadOnly := DataSet.FieldByName('ReadOnly').AsBoolean;
end;

oder damit?

Delphi-Quellcode:

procedure TForm1.ADOTable1AfterScroll(DataSet: TDataSet);
begin
  DBGrid1.ReadOnly := DataSet.FieldByName('ReadOnly').AsBoolean;
end;