ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/nongui/IBExtract.pas
(Generate patch)

Comparing ibx/trunk/runtime/nongui/IBExtract.pas (file contents):
Revision 224 by tony, Mon Mar 19 09:48:37 2018 UTC vs.
Revision 225 by tony, Tue Apr 3 09:09:05 2018 UTC

# Line 71 | Line 71 | type
71    TIBExtract = class(TComponent)
72    private
73      FAlwaysQuoteIdentifiers: boolean;
74 +    FCaseSensitiveObjectNames: boolean;
75      FDatabase : TIBDatabase;
76      FTransaction : TIBTransaction;
77      FMetaData: TStrings;
# Line 137 | Line 138 | type
138      property Transaction : TIBTransaction read GetTransaction write SetTransaction;
139      property ShowSystem: Boolean read FShowSystem write FShowSystem;
140      property AlwaysQuoteIdentifiers: boolean read FAlwaysQuoteIdentifiers write FAlwaysQuoteIdentifiers;
141 +    property CaseSensitiveObjectNames: boolean read FCaseSensitiveObjectNames write FCaseSensitiveObjectNames;
142    end;
143  
144    TSQLType = record
# Line 2962 | Line 2964 | begin
2964      DidActivate := true;
2965    end;
2966    FMetaData.Clear;
2967 +  if not CaseSensitiveObjectNames then
2968 +    ObjectName := ExtractIdentifier(FDatabaseInfo.DBSQLDialect,ObjectName);
2969    case ObjectType of
2970      eoDatabase : ExtractDDL(true, '', ExtractTypes);
2971      eoDomain :

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines