Переглянути джерело

* When the dataset is read from file, do not prepare the sql-statement
* Datasets which are read from file are in principle modifyable

git-svn-id: trunk@13264 -

joost 16 роки тому
батько
коміт
9f93cccd7a
1 змінених файлів з 8 додано та 1 видалено
  1. 8 1
      packages/fcl-db/src/sqldb/sqldb.pp

+ 8 - 1
packages/fcl-db/src/sqldb/sqldb.pp

@@ -1214,7 +1214,14 @@ var tel, fieldc : integer;
     ReadFromFile: Boolean;
 begin
   ReadFromFile:=IsReadFromPacket;
-  Prepare;
+  if ReadFromFile then
+    begin
+    FCursor:=TSQLCursor.Create;
+    FCursor.FStatementType:=stSelect;
+    FUpdateable:=True;
+    end
+  else
+    Prepare;
   if FCursor.FStatementType in [stSelect,stExecProcedure] then
     begin
     if not ReadFromFile then