Probier mal folgende Schritte:
Abfrage eines Datensatzes
Query.sql.text := 'Select irgendwas...';
Öffnen
Query.Open;
Datenzeiger positionieren
Query.first;
Editmode einschalten
Query.edit;
Feld ändern
Query.fieldByName('feldname').asinteger := ....
Zurückschreiben
Query.Post;
Ciao
Stefan