TQuery (BDE) / TDataSet - Verständnisproblem "Modified"

[Bodenseematze]

Hallo zusammen,

ich weiß: BDE ist alter Tobak und sollte ersetzt werden, genau wie das von mir verwendete Delphi 7...
...aber ich muss es halt aktuell (noch) verwenden
(und außerdem bin ich nicht sicher, ob es nicht bei anderen TDataSet-Klassen auch so ist)

Vielleicht kann mir trotzdem noch jemand aus seiner Erfahrung berichten - ich verstehe nämlich nicht so ganz, wie ich erkenne, ob sich ein Datensatz geändert hat oder nicht...

Hier kurz meine Problemschilderung:
Ich versuche in meinen datenbankbasierten Masken anzuzeigen, ob sich der aktuell aufgeschaltete Datensatz geändert hat (d.h. ob eine der Datenbankfelder auf der Maske sich verändert haben oder ob der gesamte Datensatz neu ist).

Die Datenbankverbindung ist zu einem MS-SQL Server über einen ODBC-Eintrag gemacht - es wird in der BDE entsprechend die ODBC-DSN verwendet.
Auf der Maske ist ein TQuery mit CachedUpdates=True, UpdateMode=upWhereKeyOnly und UpdateObject gesetzt (Rest der Properties sind "false") und das dazugehörige TDataSource, dass sich auf die Query als DataSet bezieht; alle auf der Maske befindlichen Edit-Felder beziehen sich auf diese TDataSource und ein DataField aus dem TQuery.

Um zu prüfen, ob Änderungen im Query sind, wird in einer allgemeinen Methode "HasChanges" folgendes geprüft:

Delphi-Quellcode:

Result := false;
if ( qry.Active and qry_.CanModify ) then begin
  if ( (qry_.State = dsEdit) or (qry_.State = dsInsert) ) then begin
    Result := true;
  end
  else
  if ( qry_.CachedUpdates and qry_.UpdatesPending ) then begin
    Result := true;
  end;
end;

Wenn ich jetzt direkt nach dem Öffnen des Queries mit einem (!) Datensatz die Prüfmethode aufrufe, kommt "true" (d.h. es gibt Änderungen) zurück.
Wenn ich mir das Query genauer anschaue, sehe ich folgendes:
Active=true, CanModify=true, RecordCount=1, UpdateStatus()=Modified, State=dsBrowse, CachedUpdates=true, UpdatesPending=true
Und wenn ich über alle Fields in dem Datensatz laufe und mir diese anschaue, sehe ich keinerlei Änderungen (Value, NewValue, ggf. OldValue sind alle gleich).

Wieso wird mir als "UpdateStatus()" Modified zurückgeliefert?
Und warum ist "UpdatesPending" gesetzt?
Und das direkt in "AfterScroll"!?

Ich glaube, ich verstehe die Properties sowie die Methode "UpdateStatus()" nicht so richtig...
...kann mir da jemand Licht ins Dunkel bringen?

[himitsu]

Status steht auf Browse, nicht auf dsEdit oder dsInsert ... OldValue und NewValue können somit garnicht unterschiedlich sein.

Nja, es liegt ja eh am UpdatesPending=True.
Du hast also "wartende" Änderungen? Und somit stimmt des True.
Frag mich aber nicht, wie man ins ÄnderungsLog, bzw. in die Änderungsliste (wartende Update) reinschaut. Keine Ahnung.

qry_.UpdatesPending kann eigentlich nur True sein, wenn qry_.CachedUpdates es auch ist, womit man die eine Prüfung weglassen können dürfte.


if qry_.State in [dsEdit, dsInsert] then begin

Delphi-Quellcode:

Result := ( qry.Active and qry_.CanModify ) 
      and ( (qry_.State in [dsEdit, dsInsert]) or qry_.UpdatesPending );

[Bodenseematze]

Zitat von himitsu:

Nja, es liegt ja eh am UpdatesPending=True.
Du hast also "wartende" Änderungen? Und somit stimmt des True.

Was sind denn dann "wartende" Änderungen?
Ich bin mir nicht bewußt, dass sowas vorliegt..

Zitat von himitsu:

Frag mich aber nicht, wie man ins ÄnderungsLog, bzw. in die Änderungsliste (wartende Update) reinschaut. Keine Ahnung.

Das wäre in dem Fall schon interessant...

Zitat von himitsu:

qry_.UpdatesPending kann eigentlich nur True sein, wenn qry_.CachedUpdates es auch ist, womit man die eine Prüfung weglassen können dürfte.

Hmm, eigentlich ist so ein blödes Wort - eigentlich sollte ich auch keine "wartenden" Änderungen haben...

[Uwe Raabe]

UpdatesPending ist True, wenn Records (nicht zwingend der aktuelle Record!) verändert, hinzugefügt oder gelöscht wurden, und es kommt nur bei aktivem CachedUpdates vor. Deswegen geht es nach einem ApplyUpdates bzw. CommitUpdates wieder weg.

Der Status des aktuellen Records wird in Modified geführt. Es kann aber sein, dass noch nicht alle Änderungen in den datensensitiven Controls berücksichtig wurden. In dem Fall genügt ein Aufruf von UpdateRecord um das zu aktualisieren. Das ist übrigens bei allen DataSets so und hat nichts mit der BDE zu tun.

[Bodenseematze]

Zitat von Uwe Raabe:

UpdatesPending ist True, wenn Records (nicht zwingend der aktuelle Record!) verändert, hinzugefügt oder gelöscht wurden, und es kommt nur bei aktivem CachedUpdates vor. Deswegen geht es nach einem ApplyUpdates bzw. CommitUpdates wieder weg.

Das heißt im Umkehrschluss, dass ohne CachedUpdates nur der aktuelle Datensatz geändert sein kann?

Und: warum ist bei mir (bei nur einem Record!) dann UpdatesPending auf True gesetzt?

Zitat von Uwe Raabe:

Der Status des aktuellen Records wird in Modified geführt. Es kann aber sein, dass noch nicht alle Änderungen in den datensensitiven Controls berücksichtig wurden. In dem Fall genügt ein Aufruf von UpdateRecord um das zu aktualisieren. Das ist übrigens bei allen DataSets so und hat nichts mit der BDE zu tun.

Also sicherheitshalber immer vor der Status/Modified-Abfrage ein UpdateRecord()-Aufruf einfügen? Oder kann ich irgendwie abfragen, ob das notwendig ist?

Das kann ja dann nur für den aktuellen Record gelten, oder?
Wie ist das bei Master/Detail, wenn die Detail-Datensätze in eine TDBGrid enthalten sind?
Könnte es da mehrere Datensätze geben, bei denen noch ein UpdateRecord gemacht werden muss?

[Uwe Raabe]

Zitat von Bodenseematze:

Das heißt im Umkehrschluss, dass ohne CachedUpdates nur der aktuelle Datensatz geändert sein kann?

Das weiß ich tatsächlich nicht, da ich die BDE-Sourcen gerade nicht verfügbar habe (ich glaube sogar, die waren nie verfügbar). Ich vermute, dass das aber nicht für den aktuellen Datensatz gilt, da dieser ja bei Cancel nicht in den Update-Buffer übernommen wird.

Zitat von Bodenseematze:

Und: warum ist bei mir (bei nur einem Record!) dann UpdatesPending auf True gesetzt?

Das kann ich dir aus demselben Grund auch nicht sagen.

Zitat von Bodenseematze:

Also sicherheitshalber immer vor der Status/Modified-Abfrage ein UpdateRecord()-Aufruf einfügen?

Ja, wenn der State in [dsEdit, dsInsert] ist.

Zitat von Bodenseematze:

Oder kann ich irgendwie abfragen, ob das notwendig ist?

Nein.

Zitat von Bodenseematze:

Das kann ja dann nur für den aktuellen Record gelten, oder?
Wie ist das bei Master/Detail, wenn die Detail-Datensätze in eine TDBGrid enthalten sind?
Könnte es da mehrere Datensätze geben, bei denen noch ein UpdateRecord gemacht werden muss?

Jedes DataSet hat seinen eigenen Modified Status, egal ob Master/Detail oder nicht. Es betrifft immer den jeweils aktuellen Datensatz. Wenn du also ein Master- und ein Detail-DataSet hast, dann musst du das bei beiden machen.