Browse Source

* Check table name

michael 5 years ago
parent
commit
e46a655e18
1 changed files with 3 additions and 1 deletions
  1. 3 1
      packages/dataabstract/dadataset.pas

+ 3 - 1
packages/dataabstract/dadataset.pas

@@ -473,7 +473,9 @@ begin
   DADS:=aRequest.Dataset as TDADataset;
   DADS:=aRequest.Dataset as TDADataset;
   R:=aRequest as TDADatarequest;
   R:=aRequest as TDADatarequest;
   if (Connection=Nil) then
   if (Connection=Nil) then
-    Raise EDADataset.Create(Name+': Cannot get data without connection');
+    Raise EDADataset.Create(DADS.Name+': Cannot get data without connection');
+  if (DADS.TableName='') then
+    Raise EDADataset.Create(DADS.Name+': Cannot get data without tablename');
   DS:=Connection.EnsureDataservice;
   DS:=Connection.EnsureDataservice;
   TN:=TDAStringArray.New;
   TN:=TDAStringArray.New;
   TN.fromObject([DADS.TableName]);
   TN.fromObject([DADS.TableName]);