MySQL Daten updaten mit Delphi FireDac

[Delphi.Narium]

Welcher Zusammenhang besteht denn zwischen AccessQuery und Q_sArtikelArtNr?
Ist irgendwo definiert, dass das den Inhalt der Spalte ArtNr der Abfrage AccessQuery repräsentiert?

Delphi-Quellcode:

        MyQuery.ParamByName('ArtNr').Value := AccessQuery.Fields[0].Value;
        MyQuery.ParamByName('ArtVKPreis_0').Value := AccessQuery.Fields[1].Value;
        MyQuery.ParamByName('ArtVKPreis_1').Value := AccessQuery.Fields[2].Value;
        MyQuery.ParamByName('ArtVKPreis_2').Value := AccessQuery.Fields[3].Value;

oder

Delphi-Quellcode:

        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_2').Value;

oder

Delphi-Quellcode:

  AccessQuery.Open;
  Q_sArtikelArtNr := AccessQuery.FieldByName('ArtNr')
  Q_sArtikelArtVkPreis_0 := AccessQuery.FieldByName('ArtVKPreis_0');
  Q_sArtikelArtVkPreis_1 := AccessQuery.FieldByName('ArtVKPreis_1');
  Q_sArtikelArtVkPreis_2 := AccessQuery.FieldByName('ArtVKPreis_2');
  AccessQuery.First;

Die Zeile MyQuery.SQL.Text :='update oxarticles set oxprice= :ArtVKPreis_0,oxpricea= :ArtVKPreis_1, oxtprice= :ArtVKPreis_2 where oxid = :ArtNr'; kannst Du vor das AccessQuery.Open; verschieben. Das muss nur einmal gemacht werden und nicht pro Datensatz.