MySQL Daten updaten mit Delphi FireDac

[HCB]

Ich habe es jetzt so geändert, was leider das selbe (Nicht)ergebnis bringt.

Delphi-Quellcode:

 while not AccessQuery.EOF do
        begin
        MyQuery.SQL.Text :='update oxarticles set oxprice= :ArtVKPreis_0,oxpricea= :ArtVKPreis_1, oxtprice= :ArtVKPreis_2 where oxid = :ArtNr';
        MyQuery.ParamByName('ArtNr').Value := AccessQuery.FieldByName('ArtNr').Value;
        MyQuery.ParamByName('ArtVKPreis_0').Value := AccessQuery.FieldByName('ArtVKPreis_0').Value;
        MyQuery.ParamByName('ArtVKPreis_1').Value := AccessQuery.FieldByName('ArtVKPreis_1').Value;
        MyQuery.ParamByName('ArtVKPreis_2').Value := AccessQuery.FieldByName('ArtVKPreis_1').Value;
        MyQuery.execsql;
        ShowMessage(AccessQuery.FieldByName('ArtNr').Value);
        pgb_updateStatus.Position:=AccessQuery.RecNo;
        AccessQuery.Next;
        end;

Also showMessage zeigt mir nacheinander die richtigen Artikelnummen an. Die ArtNr ändert sich also innerhalb der Schlaufe korrekt.

Komisch.