Dataset auf Unmodified setzen?

[nachti1505]

Hallo,

ich habe ein Formular in welchem der Nutzer Eingaben machen kann.

Legt der Nutzer einen neuen Datensatz an, so belegt das Programm einige Datenfelder defaultmäßig mit Werten (bspw. wird STAAT auf DE gesetzt).

Wenn der Nutzer nun direkt nach dem Anlegen-Click auf Abbrechen drückt hat ER ja de facto noch nichts am Datensatz geändert, trotzdem wird ihm mein Programm die Sicherheitsfrage "Ungespeicherte Daten... wirklich abbrechen?" stellen, da der Datensatz ja MODIFIED ist. Gibt es eine Möglichkeit nach Belegen der Defaultfelder den Status wieder auf Unmodified zu setzen?

[mkinzler]

Rollback

[nachti1505]

Rollback setzt ja alle Änderungen zurück... eigentlich möchte ich das folgende Verhalten nachbilden:

1) Nutzer klickt auf Einfügen (Dataset.Insert --> Modified ist false)

2) Programm fügt Defaultdaten ein (Modified ist true, wegen Einfügen der Daten)

3a) Nutzer fügt Daten ein und bricht ab --> Sicherheitsfrage
3b) Nutzer fügt keine Daten ein und bricht ab --> leider auch Sicherheitsfrage wegen (2)

Es wäre also wünschenswert, dass der Zustand modified nach Einfügen der Defaultdaten auf false gesetzt wird, so dass dem Nutzer im Zustand 3b die Sicherheitsfrage NICHT gestellt wird.

[mkinzler]

Entweder kein Insert machen oder davor eine SavePoint erzeugen, welchen du dann zurückfahren kannst.

[nachti1505]

Glaube, du bist schon einen Schritt zu weit...

Wenn der Nutzer auf abbrechen klickt, wird folgende Unterscheidung getroffen:

if Nutzer_Has_Made_Changes then SicherheitsfrageStellen(Wirklich abbrechen?)
else AbbrechenOhneSicherheitsfrage;

Durch das Einfügen der Defaultwerte seitens des Programm wird dem Dataset aber immer suggeriert, der Nutzer hätte Änderungen gemacht.


Ein alternative Weg um mein Problem zu lösen wäre, alle Komponenten mit OnClick / OnKeyPress-Events auszustatten und dann ein Flag zu setzen, dass Änderungen stattgefunden haben. Ist mir aber zu umständlich, daher der Weg über Dataset.Modified, welche im oben genannten Beispiel eben nicht ganz funktioniert.

[Hansa]

Mache das "modified" doch selber. Das muss sowieso bei nicht DB-Edits etc. auch gemacht werden. Also Form-globale Variable deklarieren, z.B. AltFeldWert. Dieses im OnEnter merken und im OnExit den dann aktuellen Feldwert mit AltFeldWert Vergleichen. Ist er gleich, dann ist nichts modified ansonsten eben doch. Bei längeren Eingaben, wie bereits gesagt : immer SavePoints setzen. Werden auf einen Schlag 500 Eingaben gemacht, dann ist jeder Benutzer froh, wenn er nur Teile der Eingaben verwerfen muss und nicht alles !!

[alex517]

Hallo nachti1505,

wenn du mit FIBDataSet1.Insert einen Datensatz hinzufügst,
so existiert dieser Datensatz erstmal nur im lokalen Puffer und wird nicht an
Datenbankserver weitergereicht.
Erst mit einen FIBDataSet1.Post wird, vorausgesetzt FIBDataSet1.CancelUpdates=false,
die FIBDataSet1.UpdateTransaction gestartet, FIBDataSet1.InsertSQL ausgeführt
und damit das ganze an den Datenbankserver weitergereicht.

Wenn du aber statt dem Post ein FIBDataSet1.Cancel ausführst, wird
der neue Datensatz im lokaten Puffer verworfen und der Datenbankserver bekommt
davon überhaupt nichts mit.

FIBDataSet ist übrigens vom TDataSet abgeleitet und verhält sich dementsprechend.

alex

[shmia]

Zitat von nachti1505:

... trotzdem wird ihm mein Programm die Sicherheitsfrage "Ungespeicherte Daten... wirklich abbrechen?" stellen, da der Datensatz ja MODIFIED ist.

Prüfe einfach ein zusätzliches Feld, dass der Benutzer befüllen muss, damit der Datensatz vollständig ist.

Delphi-Quellcode:

if Dataset.Modified and not Dataset.FieldByName('WichtigesFeld').IsNull then
begin
   MessageBox('Ungespeicherte Daten...blabla...', ...)
end;