Entwickler-Ecke
Datenbanken - alle AdoDatasets aktualisieren
hoho haha - Di 14.10.08 21:59
Titel: alle AdoDatasets aktualisieren
Hallo zusammen,
ich habe eine größere Applikation, mit mehreren Datasets. Momentan rufen ich für jedes Dataset die Requery Prozedur separat auf. Da sich Namen und Anzahl der Datasets immer wieder ändert, wäre es praktisch, wenn man alle TBetterADODataset Objekte, die den Status Open haben, in einer Prozedur automatisch aktualisieren könnte.
Gibt es hier eine Möglichkeit?
Danke
alzaimar - Di 14.10.08 22:37
Deklariere alle Datenmengen (TDataSet-Abkömmlinge) in einem oder mehreren Datenmodulen. Jedes Datenmodul sollte einen logisch abgeschlossenen Bereich deiner Datenbank beinhalten. Dann kannst Du durch alle Komponenten deines Datenmoduls iterieren und die Komponenten, die TBetterADODatasets sind, entsprechend behandeln:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| Procedure TDatamodule.RefreshAllDatasets;
Var
i : Integer;
Begin
For i:=0 To Components.Count - 1 do
If Components[i] is TBetterADODataset Then
TBetterADODataset(Components[i]).Refresh;
End; |
So oder ähnlich sollte es funktionieren.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!