* Merging revisions 48702 from trunk:

    ------------------------------------------------------------------------
    r48702 | michael | 2021-02-17 22:07:57 +0100 (Wed, 17 Feb 2021) | 1 line
    
    * Cursor can be nil, patch from Mattias Gaertner
    ------------------------------------------------------------------------

git-svn-id: tags/release_3_2_2_rc1@48704 -

packages/fcl-db/src/sqldb/sqldb.pp

@@ -3122,7 +3122,7 @@ begin
       UpdateServerIndexDefs;
 
     FStatement.Execute;
-    if not Cursor.FSelectable then
+    if (Cursor=nil) or (not Cursor.FSelectable) then
       DatabaseError(SErrNoSelectStatement,Self);
 
     // InternalInitFieldDef is only called after a prepare. i.e. not twice if