Datenbanktabelle direkt bearbeiten

[shmia]

Hier ein Beispiel zum direkten Ändern von Daten in einer Tabelle/Abfrage:

Delphi-Quellcode:

  Table1.Open;

  while not Table1.Eof do  // Schleife über gesamte Tabelle
  begin
     if Table1.FieldByName('Preis').AsDouble > 100.0 then
     begin
        Table1.Edit;   
        Table1.FieldByName('Infotext').AsString := 'Nur Barverkauf !';
        Table1.Post;   // Änderung speichern
     end;
     Table1.Next;  // nächster Datensatz
  end;