Ich habe ein TADQuery (FireDAC) mit diversen calculated Fields an eine TDBGrid-Komponente gehängt und möchte in dem Grid bestimmte Berechnungen durchführen...
Die Query-Komponente führt OnCalcFields allerdings immer erst nach einem Update aus (z.B. wenn ich zum nächsten Datensatz wechsele), was auch logisch ist, da die Query-Komponente von einem Spaltenwechsel gar nichts mitkriegt.

Wie kann ich die berechneten Felder bereits neu berechnen lassen, wenn ich im Grid die Spalte wechsele?
Angenommen ich habe folgende Spalten: X (Persistent), Y (Persistent), Z (Berechnet)
Wenn ich jetzt X oder Y im Grid bearbeite, soll Z sofort neu berechnet werden, sobald ich in eine andere Spalte, bzw. aus dem Editmodus springe.

Im Moment gehe ich folgenden Weg:

markieren

Delphi-Quellcode:

procedure TDummyForm.DBGrid1ColEnter(Sender: TObject);
begin
  if (self.Query1.State = dsEdit) then
    self.Query1CalcFields(Query1);
end;

procedure TDummyForm.Query1CalcFields(DataSet: TDataSet);
begin
  // Hier werden die Spalten neu berechnet
end;

Ich rufe die Methode also selbst in einem Event des Grids auf.

Gibt es einen eleganteren Weg?

Du könntest OnDataChange von der Datasource dafür verwenden.

Das Problem ist, dass OnDataChange auch bei InternalCalc-Feldern aufgerufen wird. Ich habe so also eine Endlosschleife...

Ah ok, reicht da die Abfrage auf State und Field nicht um das abzufangen?

Eigentlich werden die CalcFields automatisch bei jeder Änderung eines Datenfeldwertes neu berechnet. Irgendetwas stimmt da bei dir nicht.

Zitat von Uwe Raabe:

Eigentlich werden die CalcFields automatisch bei jeder Änderung eines Datenfeldwertes neu berechnet. Irgendetwas stimmt da bei dir nicht.

Nur wenn AutoCalcFields=True ist und davon wird wegen ständigem Ereignisauslösen meist abgeraten.

Ist bei mir aber True, trotzdem wird nur nach jedem Datensatzwechsel neu berechnet... ich wühle mich mal durch die Quellen

Zitat von baumina:

Zitat von Uwe Raabe:

Eigentlich werden die CalcFields automatisch bei jeder Änderung eines Datenfeldwertes neu berechnet. Irgendetwas stimmt da bei dir nicht.

Nur wenn AutoCalcFields=True ist und davon wird wegen ständigem Ereignisauslösen meist abgeraten.

Das wäre aber hier wohl der "elegantere Weg" nach dem anfangs gefragt wurde.

Zitat von Uwe Raabe:

Das wäre aber hier wohl der "elegantere Weg" nach dem anfangs gefragt wurde.

Stimmt, immer diese Wege nach Rom ...

Okay... Also sobald man mindestens ein InternalCalcField im DataSet hat, wird OnCalcFields nicht mehr automatisch aufgerufen...
Ist das jetzt ein Bug, oder by Design?! =/

Ich habe XE3 mit FireDAC 3119 (7.0.1)
Kann das mal bitte jemand mit einer neueren Version checken?