Einzelnen Beitrag anzeigen

HJay

Registriert seit: 7. Dez 2009
172 Beiträge
 
Delphi XE7 Enterprise
 
#1

ADO.Open wirft exception falls IsEmpty

  Alt 10. Dez 2015, 15:21
Datenbank: MSSQL • Version: ? • Zugriff über: ADO
Code:
  myADO := TADOQuery.Create(nil);
  myADO.ConnectionString := ACS;
  myADO.Prepared        := True;
  myADO.SQL.Clear;
  myADO.SQL.Add(ASQL);

  myADO.Open; // exception, falls kein Dataset

  if not myADO.IsEmpty then begin ... end
Der SQL-Befehl ist fehlerfrei. Wenn die Abfrage eine Ergebnismenge zurückliefert, klappt alles einwandfrei. Wenn aber keine Datensätze zurückgegeben weden, gibt es eine entsprechende Exception bei myADO.Open ("CommandText liefert keine Ergebnismenge")

Kann man die ADO-Komponente so einstellen, dass keine Exception bei leeren Datenmengen auftritt?

Wozu ist die Funktion IsEmpty gedacht, wenn doch ohnehin vorher eine Exception auftritt?
  Mit Zitat antworten Zitat