Wie muß ich eine TTable einstellen damit der Befehl

markieren

Code:

table1.Fields[37].AsBoolean := false;

funktioniert?

Fehler: "Datenmanege weder im Einfüge noch im Editiermodus"

Hallo theomega,

markieren

Code:

table1.Edit;

für den Fall, dass der zu ändernde Datensatz bereits ausgewählt ist.

Oder

markieren

Code:

table1.Append;

für den Fall, dass ein neuer Datensatz eingefügt werden soll.

In jedem Fall ist vor einer dieser Anweisungen noch (irgendwo)

markieren

Code:

table1.Open;

notwendig.

Das funktioniert irgendwie nicht. Der Fehler bleibt. Ich verwenden folgenden Code:

markieren

Code:

table1.open;
for i:= 0 to table1.RecordCount do begin;
table1.RecNo := i;
table1.Fields[37].AsBoolean := false;
end;

egal wo ich das table1.edit hinsetzte, der Fehler bleibt gleich.

Hallo theomega,

hat denn deine Tabelle wirklich 38 Felder? Du solltest sicherheitshalber über den Namen zugreifen, da die Reihenfolge der Felder in der Fields Eigenschaft nicht immer der Feldreihenfolge bei der Definition der Tabelle ist. Nemen wir an, dein Feld heißt "istReich" und ist vom Wert Boolean, dann könntest du folgendes Schreiben:

markieren

Code:

Table1.open;
try
  for i := 0 to Table1.RecordCount -1 do
  begin
    Table1.Edit;
    Table1.FieldByName('RecNo').AsInteger := i;
    Table1.FieldByName('istReich').AsBoolean := False;
    Table1.Post;
    Table1.Next;
   end;
except
  on E:exception do
  begin
    Table1.Cancel;
    ShowMessage('Fehler beim Eintragen der Werte.'#13
                  +E.Message);
  end
end;
Table1.Close;

Die Felder RecNo und istReich müssen natürlich existieren.