mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-04-09 08:37:46 +02:00
* Check table name
This commit is contained in:
parent
6219494a7a
commit
e46a655e18
@ -473,7 +473,9 @@ begin
|
||||
DADS:=aRequest.Dataset as TDADataset;
|
||||
R:=aRequest as TDADatarequest;
|
||||
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;
|
||||
TN:=TDAStringArray.New;
|
||||
TN.fromObject([DADS.TableName]);
|
||||
|
Loading…
Reference in New Issue
Block a user