Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Assertion Fehler 1890 bei AnyDac (https://www.delphipraxis.net/198962-assertion-fehler-1890-bei-anydac.html)

egentur 14. Dez 2018 13:50

Datenbank: MSSQL • Version: 2012 • Zugriff über: AnyDAC

Assertion Fehler 1890 bei AnyDac
 
Hallo zusammen.

Ich habe noch eine ältere Anwendung welche die AnyDAC Komponenten verwendet.
Seit einiger Zeit häuft sich bei DB Zugriffen der Fehler

Assertion fehlges (G:\CodeGear\Library\AnyDAC for Delphi\Source\uADStanUtil.pas, Zeile 1890).

Delphi 2007 32Bit
anwendung läuft auf
Win7 / Win10 64Bit

Die Codezeile
var
oData: TADTimerData;

FLock.Enter;
try
oData := FTimerDatas;
-> ASSERT((oData <> nil) and (oData.FState = tsWaiting) and (oData.FTimer <> nil));
oData.FState := tsRaised;
finally
FLock.Leave;
end;

würde doch bedeuten, dass wenn oData und oData
nicht nil sind, müsste oData.FState = tsWaiting sein

Kann dies auf eine Performance Problem hindeuten ?

Vielen Dank für einen Hinweis

Uwe Raabe 14. Dez 2018 14:30

AW: Assertion Fehler 1890 bei AnyDac
 
Zitat:

Zitat von egentur (Beitrag 1420879)
...
-> ASSERT((oData <> nil) and (oData.FState = tsWaiting) and (oData.FTimer <> nil));
...
würde doch bedeuten, dass wenn oData und oData
nicht nil sind, müsste oData.FState = tsWaiting sein

wenn oData und oData.FTimer nicht nil sind, müsste oData.FState <> tsWaiting sein, damit die Assertion fehl schlägt.

egentur 14. Dez 2018 15:20

AW: Assertion Fehler 1890 bei AnyDac
 
Ja natürlich ,

mich wundert nur, das der Fehler bisher noch nie aufgetreten ist.
AnyDAC wurde ja durch FireDAC abgelöst, und die Stelle müsste doch
in ähnlicher Weise implementiert sein.

Weiß da jemand Bescheid ?


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:12 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