Browse Source

* Publish UseDollarString and DollarStrings properties

git-svn-id: trunk@33548 -
michael 9 years ago
parent
commit
e78e4d0e72
2 changed files with 4 additions and 0 deletions
  1. 2 0
      packages/fcl-db/src/base/sqlscript.pp
  2. 2 0
      packages/fcl-db/src/sqldb/sqldb.pp

+ 2 - 0
packages/fcl-db/src/base/sqlscript.pp

@@ -124,6 +124,8 @@ type
     property Aborted;
     property Aborted;
     property Line;
     property Line;
   published
   published
+    Property UseDollarString;
+    Property DollarStrings;
     property Directives;
     property Directives;
     property Defines;
     property Defines;
     property Script;
     property Script;

+ 2 - 0
packages/fcl-db/src/sqldb/sqldb.pp

@@ -693,6 +693,8 @@ type
     Property DataBase : TDatabase Read FDatabase Write SetDatabase;
     Property DataBase : TDatabase Read FDatabase Write SetDatabase;
     Property Transaction : TDBTransaction Read FTransaction Write SetTransaction;
     Property Transaction : TDBTransaction Read FTransaction Write SetTransaction;
     property OnDirective: TSQLScriptDirectiveEvent read FOnDirective write FOnDirective;
     property OnDirective: TSQLScriptDirectiveEvent read FOnDirective write FOnDirective;
+    Property UseDollarString; 
+    Property DollarStrings;     
     property Directives;
     property Directives;
     property Defines;
     property Defines;
     property Script;
     property Script;