Zeos 7.03 Umstellung, bekomme keine Connection mehr

[waldforest]

Hallo,
ich habe soeben auf ZEOS 7.0.3 stabil aktualisiert.
Leider erhalte ich nun eine Fehlermeldung
"Database Connection is not assigned", die ich mir nicht erklären kann. Meine Anwendung lief mit ZEOS 7.0.2 rc problemlos.

Im Designemodus lässt sich die Verbindung zur Datenbank sauber herstellen.
Ich komme einfach nicht weiter, hat jemand einen Tipp, wonach ich weiter suchen, den Fehler näher eingrenzen kann.
Ein Austausch der TZConnection hat mich nicht weiter gebracht

Muss ich eventuell alle Datasets, StoredProc neu erstellen, was mir ne menge Arbeit machen würde ?

@Ich benutze Firebird 2.1 und Delphi 7.

mfg

[haentschman]

Moin...

schaue mal ob die Connection bei den Query / Table noch eingetragen ist. Evt. hat sich eine verabschiedet.

[EgonHugeist]

Die Exception wird ausgelöst, wenn die TZConnection-Componente noch inaktiv ist und ein TZDataSet im Aktiven Zustand auf eben jene zugreift.

Also beim compilieren darauf achten, das die Erstellungs-Reihenfolge passt (TZConnection vor TZTable etc.) bzw alle DataSets erst Active=True sind, wenn die Connection aufgebaut wurde.

Du hast Recht daß die Exception in der RC2 nicht enthalten war, da mir böse AV's aufgefallen waren, habe ich den check auf ZConnection.Connected=True noch hinzugefügt.

Gruß, Michael

[waldforest]

Hallo,
ok, ich bin einen kleinen Schritt weiter gekommen.

Ursache liegt in den TZStoredProc.
Sobald er StoredProcName aus der Datenbank eingetragen ist kommt es zur Exception.
Anscheinend wird hier die besagte Reihenfolge nicht eingehalten.
Alle Querys, Datasets sind nicht aktiv.


mfg

[EgonHugeist]

Hmm schaut aus, als hast du Recht.

Wende mal das beigefügte Patch an..

[waldforest]

Hallo,
vielen Dank, gewusst wo, funktioniert !!

mfg

[Sir Rufo]

@EgonHugeist

Statt zu prüfen ob die Connection verbunden ist und eine Exception zu werfen wenn nicht, wäre es nicht besser die Connection dann einfach zu öffnen?

So kenne ich das bei anderen Komponenten

[EgonHugeist]

@Sir Rufo

Das macht CheckConnected ja:

Delphi-Quellcode:

{**
  Checks if the database connection is assigned
  and tries to connect.
}
procedure TZAbstractRODataset.CheckConnected;
begin
  if Connection = nil then
    raise EZDatabaseError.Create(SConnectionIsNotAssigned);
  Connection.Connect; <- wenn möglich, dann öffne die Verbindung
end;

War nur falsch platziert.

@waldforest

Patch commited to \testing-7.1 (SVN) R2016
wird auf Zeos7-stable 7.0.4 in einigen Wochen mit dabei sein

[waldforest]

Hallo,
so einen Teil meiner Anwendungen ahbe ich nun unter 7.0.3 laufen.

In einer Anwednung nutze ich eine OLEVerbindung über ADO.
Die Verbindung zu Access-Datenbank funktioniert, nur jegliche SQL Aktion laufen auf Fehler und es wird eine Exception ausgelöst.
Die Anwendung wurde mit ZEOS 6 sauber.
Mit Zeos 7 scheint hier etwas umgestellt worden ziu sein, und funktioniert nicht mehr.

M fehlt das Detailwissen, die Ursache zu finden, und zu beseitigen.

Fehler tritt
unter ZDbcAdoStatement
AdoRecordSet := FAdoCommand.Execute(RC, EmptyParam, -1{adExecuteNoRecords});

z.B.bei
SQL.Text := 'Delete from XYZ_Table';
ExecSQL;

auf

Auch eine Anpassung
SQL.ADD ('Delete from XYZ_Table');
Prepare;
ExecSQL;

andert nichts

Gibt's vielleicht hier auch einen Tipp, wie ich der Sache auf den Grund gehen kann.

[EgonHugeist]

Hmm meine die Tests zeigen keine Problem dergleichen..

Werde mal die 6.6.6 gegewn 7.0.3 stellen, um Unterschiede zu checken. Wird aber heut nix mehr..