![]() |
Datenbank: MySQL • Zugriff über: ZEOS
Datasets
Hallo Zusammen
Aus Lehrzwecken bin ich dabei, die Datenbank-Restore Funktion von CAO zu analysieren. Der mir vorliegende Code ist noch für die Version 5 der ZEOS-Komponenten geschrieben und ist (grösstenteils) nicht mehr mit der aktuellen Version (6.5.1 Alpha) kompatibel. Dadurch bedingt existieren div. Eigenschaften der Komponenten nicht mehr. Im grossen ganzen ist der Ablauf für mich nachvollziehbar, über einen Abschnitt bin ich mir jedoch nicht im klaren. Konkret würde mich interessieren, welche Aufgabe die beiden folgenden Abschnitte haben, bzw. was mit "offene Datasets merken" gemeint ist:
Delphi-Quellcode:
bzw. das Gegenstück:
// offene Datasets merken
setlength(DSTab,DM1.DB1.DatasetCount); for i:=0 to DM1.DB1.DatasetCount-1 do begin DSTab[i] :=tDataset(DM1.DB1.Datasets[i]).Active; tDataset(DM1.DB1.Datasets[i]).Close; end;
Delphi-Quellcode:
Kann mir ev. jemand auf die Sprünge helfen?
// offene Datasets erneut öffnen
for i:=0 to DM1.DB1.DatasetCount-1 do begin if DSTab[i] then tDataset(DM1.DB1.Datasets[i]).Open; end; Besten Dank Gruss Blawen |
Re: Datasets
Damit wird in einem dynamischen Array of boolean (dsTab) die Eigenschaft Active jedes Datasets im dynamischen Array of TDataSet (DM1.DB1.DataSet) gemerkt. Die Verbindung zwischen Dataset und Status erfolgt dabei über den Index (hier i).
Dadurch wird sichergestellt, dass alle vorher aktiven Datasets nach dem Schliessen (z.B. für Maintenance) auch wieder geöffnet werden. |
Re: Datasets
Zitat:
Besten Dank für Deine Erklärung. Was mir jedoch nicht klar ist, was genau sind in diesem Falle Datasets? (Verbindungen zwischen Datasource und der Tabelle/Query? Oder was soll ich mir darunter vorstellen) Gruss Blawen |
Re: Datasets
Nein eine TTable- oder eine TQuery-Komponente sind das DataSet.
|
Re: Datasets
Zitat:
|
Re: Datasets
ja der Status wird gesichert und alles geschlossen. Im 2. teil werden dann, die vorher geöffneten wieder geöffnet.
|
Re: Datasets
Zitat:
Jetzt habe sogar ich es begriffen |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:22 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz