Datenmenge weder im Editier noch im Einfügemodus

[Sir Rufo]

Du kannst die Zeilen mit

Delphi-Quellcode:

if SomeDataset.Active {= True} then
  SomeDataset.Active := False;

einfach ersetzen durch

Delphi-Quellcode:

// Dataset soll geschlossen sein
SomeDataset.Active := False;

Ist die Datenmenge geöffnet, dann wird die geschlossen, ansonsten bleibt die geschlossen.
Dein Code bläht das nur um eine zusätzliche und unnötige Abfrage auf.

In deinem Code ist auch die Abfrage auf den State unnötig, denn kurz vorher öffnest du die Datenmenge und dann ist die gesichert niemals im dsEdit State.