|
@@ -1,11 +1,11 @@
|
|
object fmComparison: TfmComparison
|
|
object fmComparison: TfmComparison
|
|
- Left = 175
|
|
|
|
|
|
+ Left = 303
|
|
Height = 628
|
|
Height = 628
|
|
- Top = 38
|
|
|
|
- Width = 758
|
|
|
|
|
|
+ Top = 182
|
|
|
|
+ Width = 710
|
|
Caption = 'Database comparison'
|
|
Caption = 'Database comparison'
|
|
ClientHeight = 628
|
|
ClientHeight = 628
|
|
- ClientWidth = 758
|
|
|
|
|
|
+ ClientWidth = 710
|
|
KeyPreview = True
|
|
KeyPreview = True
|
|
OnClose = FormClose
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
OnCreate = FormCreate
|
|
@@ -15,17 +15,17 @@ object fmComparison: TfmComparison
|
|
LCLVersion = '1.2.2.0'
|
|
LCLVersion = '1.2.2.0'
|
|
object Label1: TLabel
|
|
object Label1: TLabel
|
|
Left = 15
|
|
Left = 15
|
|
- Height = 13
|
|
|
|
|
|
+ Height = 17
|
|
Top = 112
|
|
Top = 112
|
|
- Width = 125
|
|
|
|
|
|
+ Width = 174
|
|
Caption = 'Original (target) database'
|
|
Caption = 'Original (target) database'
|
|
ParentColor = False
|
|
ParentColor = False
|
|
end
|
|
end
|
|
object laDatabase: TLabel
|
|
object laDatabase: TLabel
|
|
- Left = 159
|
|
|
|
- Height = 13
|
|
|
|
|
|
+ Left = 226
|
|
|
|
+ Height = 17
|
|
Top = 112
|
|
Top = 112
|
|
- Width = 64
|
|
|
|
|
|
+ Width = 80
|
|
Caption = 'laDatabase'
|
|
Caption = 'laDatabase'
|
|
Font.Style = [fsBold]
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentColor = False
|
|
@@ -33,19 +33,19 @@ object fmComparison: TfmComparison
|
|
end
|
|
end
|
|
object Label2: TLabel
|
|
object Label2: TLabel
|
|
Left = 16
|
|
Left = 16
|
|
- Height = 13
|
|
|
|
|
|
+ Height = 17
|
|
Top = 143
|
|
Top = 143
|
|
- Width = 140
|
|
|
|
|
|
+ Width = 195
|
|
Caption = 'Compared (source) database'
|
|
Caption = 'Compared (source) database'
|
|
ParentColor = False
|
|
ParentColor = False
|
|
end
|
|
end
|
|
object cbComparedDatabase: TComboBox
|
|
object cbComparedDatabase: TComboBox
|
|
- Left = 159
|
|
|
|
- Height = 21
|
|
|
|
|
|
+ Left = 226
|
|
|
|
+ Height = 31
|
|
Hint = 'All changes from this database to the target database will be listed'
|
|
Hint = 'All changes from this database to the target database will be listed'
|
|
- Top = 134
|
|
|
|
|
|
+ Top = 136
|
|
Width = 460
|
|
Width = 460
|
|
- ItemHeight = 13
|
|
|
|
|
|
+ ItemHeight = 0
|
|
OnChange = cbComparedDatabaseChange
|
|
OnChange = cbComparedDatabaseChange
|
|
ParentShowHint = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
ShowHint = True
|
|
@@ -53,17 +53,17 @@ object fmComparison: TfmComparison
|
|
TabOrder = 0
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object laComparedDatabase: TLabel
|
|
object laComparedDatabase: TLabel
|
|
- Left = 159
|
|
|
|
- Height = 13
|
|
|
|
- Top = 168
|
|
|
|
- Width = 10
|
|
|
|
|
|
+ Left = 226
|
|
|
|
+ Height = 17
|
|
|
|
+ Top = 176
|
|
|
|
+ Width = 11
|
|
Caption = '[]'
|
|
Caption = '[]'
|
|
Font.Style = [fsBold]
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentColor = False
|
|
ParentFont = False
|
|
ParentFont = False
|
|
end
|
|
end
|
|
object bbStart: TBitBtn
|
|
object bbStart: TBitBtn
|
|
- Left = 542
|
|
|
|
|
|
+ Left = 549
|
|
Height = 30
|
|
Height = 30
|
|
Top = 288
|
|
Top = 288
|
|
Width = 154
|
|
Width = 154
|
|
@@ -109,10 +109,10 @@ object fmComparison: TfmComparison
|
|
TabOrder = 3
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object meLog: TMemo
|
|
object meLog: TMemo
|
|
- Left = 13
|
|
|
|
- Height = 236
|
|
|
|
|
|
+ Left = 15
|
|
|
|
+ Height = 272
|
|
Top = 328
|
|
Top = 328
|
|
- Width = 673
|
|
|
|
|
|
+ Width = 674
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
Font.Name = 'Courier 10 Pitch'
|
|
Font.Name = 'Courier 10 Pitch'
|
|
ParentFont = False
|
|
ParentFont = False
|
|
@@ -122,10 +122,10 @@ object fmComparison: TfmComparison
|
|
end
|
|
end
|
|
object laScript: TLabel
|
|
object laScript: TLabel
|
|
Cursor = crHandPoint
|
|
Cursor = crHandPoint
|
|
- Left = 224
|
|
|
|
- Height = 13
|
|
|
|
- Top = 305
|
|
|
|
- Width = 193
|
|
|
|
|
|
+ Left = 16
|
|
|
|
+ Height = 17
|
|
|
|
+ Top = 296
|
|
|
|
+ Width = 272
|
|
Caption = 'Script differences in compared database'
|
|
Caption = 'Script differences in compared database'
|
|
Font.Style = [fsUnderline]
|
|
Font.Style = [fsUnderline]
|
|
ParentColor = False
|
|
ParentColor = False
|
|
@@ -136,57 +136,57 @@ object fmComparison: TfmComparison
|
|
Left = 15
|
|
Left = 15
|
|
Height = 79
|
|
Height = 79
|
|
Top = 192
|
|
Top = 192
|
|
- Width = 513
|
|
|
|
|
|
+ Width = 488
|
|
Caption = 'Compared objects'
|
|
Caption = 'Compared objects'
|
|
- ClientHeight = 61
|
|
|
|
- ClientWidth = 509
|
|
|
|
|
|
+ ClientHeight = 60
|
|
|
|
+ ClientWidth = 484
|
|
TabOrder = 2
|
|
TabOrder = 2
|
|
object cxTables: TCheckBox
|
|
object cxTables: TCheckBox
|
|
Left = 11
|
|
Left = 11
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 4
|
|
Top = 4
|
|
- Width = 51
|
|
|
|
|
|
+ Width = 69
|
|
Caption = 'Tables'
|
|
Caption = 'Tables'
|
|
TabOrder = 0
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object cxGenerators: TCheckBox
|
|
object cxGenerators: TCheckBox
|
|
Left = 11
|
|
Left = 11
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 32
|
|
Top = 32
|
|
- Width = 74
|
|
|
|
|
|
+ Width = 102
|
|
Caption = 'Generators'
|
|
Caption = 'Generators'
|
|
TabOrder = 1
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object cxTriggers: TCheckBox
|
|
object cxTriggers: TCheckBox
|
|
Left = 151
|
|
Left = 151
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 4
|
|
Top = 4
|
|
- Width = 59
|
|
|
|
|
|
+ Width = 80
|
|
Caption = 'Triggers'
|
|
Caption = 'Triggers'
|
|
TabOrder = 2
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object cxViews: TCheckBox
|
|
object cxViews: TCheckBox
|
|
Left = 151
|
|
Left = 151
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 34
|
|
Top = 34
|
|
- Width = 47
|
|
|
|
|
|
+ Width = 66
|
|
Caption = 'Views'
|
|
Caption = 'Views'
|
|
TabOrder = 3
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object cxStoredProcs: TCheckBox
|
|
object cxStoredProcs: TCheckBox
|
|
Left = 262
|
|
Left = 262
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 4
|
|
Top = 4
|
|
- Width = 81
|
|
|
|
|
|
+ Width = 113
|
|
Caption = 'Stored Procs'
|
|
Caption = 'Stored Procs'
|
|
TabOrder = 4
|
|
TabOrder = 4
|
|
end
|
|
end
|
|
object cxUDFs: TCheckBox
|
|
object cxUDFs: TCheckBox
|
|
Left = 262
|
|
Left = 262
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Hint = 'User Defined Functions'
|
|
Hint = 'User Defined Functions'
|
|
Top = 32
|
|
Top = 32
|
|
- Width = 45
|
|
|
|
|
|
+ Width = 61
|
|
Caption = 'UDFs'
|
|
Caption = 'UDFs'
|
|
ParentShowHint = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
ShowHint = True
|
|
@@ -194,26 +194,26 @@ object fmComparison: TfmComparison
|
|
end
|
|
end
|
|
object cxDomains: TCheckBox
|
|
object cxDomains: TCheckBox
|
|
Left = 390
|
|
Left = 390
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 4
|
|
Top = 4
|
|
- Width = 60
|
|
|
|
|
|
+ Width = 85
|
|
Caption = 'Domains'
|
|
Caption = 'Domains'
|
|
TabOrder = 6
|
|
TabOrder = 6
|
|
end
|
|
end
|
|
object cxRoles: TCheckBox
|
|
object cxRoles: TCheckBox
|
|
Left = 390
|
|
Left = 390
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 34
|
|
Top = 34
|
|
- Width = 46
|
|
|
|
|
|
+ Width = 63
|
|
Caption = 'Roles'
|
|
Caption = 'Roles'
|
|
TabOrder = 7
|
|
TabOrder = 7
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object StatusBar1: TStatusBar
|
|
object StatusBar1: TStatusBar
|
|
Left = 0
|
|
Left = 0
|
|
- Height = 20
|
|
|
|
- Top = 608
|
|
|
|
- Width = 758
|
|
|
|
|
|
+ Height = 21
|
|
|
|
+ Top = 607
|
|
|
|
+ Width = 710
|
|
Panels = <
|
|
Panels = <
|
|
item
|
|
item
|
|
Width = 50
|
|
Width = 50
|
|
@@ -221,9 +221,9 @@ object fmComparison: TfmComparison
|
|
SimplePanel = False
|
|
SimplePanel = False
|
|
end
|
|
end
|
|
object bbClose: TBitBtn
|
|
object bbClose: TBitBtn
|
|
- Left = 684
|
|
|
|
|
|
+ Left = 676
|
|
Height = 24
|
|
Height = 24
|
|
- Top = 6
|
|
|
|
|
|
+ Top = 0
|
|
Width = 27
|
|
Width = 27
|
|
Anchors = [akTop, akRight]
|
|
Anchors = [akTop, akRight]
|
|
Caption = ' X '
|
|
Caption = ' X '
|
|
@@ -238,9 +238,9 @@ object fmComparison: TfmComparison
|
|
Left = 13
|
|
Left = 13
|
|
Height = 98
|
|
Height = 98
|
|
Top = 8
|
|
Top = 8
|
|
- Width = 712
|
|
|
|
|
|
+ Width = 697
|
|
AutoSize = False
|
|
AutoSize = False
|
|
- Caption = 'Database comparison tool compares original database structure to another database structure.'#13#10'It generates a script to make the compared (source) database structure become like the original (target) database.'#13#10#13#10'For instance, the original database could be a development database, and compared database is an old version that'#13#10'is deployed at a customer. This tool generates a script to make the customer database structure '#13#10'resemble the developmenent database as much as possible.'
|
|
|
|
|
|
+ Caption = 'Database comparison tool compares original database structure to another database structure.'#13#10'It generates a script to make the compared (source) database structure become like the original (target) database.'#13#10'For instance, the original database could be a development database, and compared database is an old version that'#13#10'is deployed at a customer. This tool generates a script to make the customer database structure '#13#10'resemble the developmenent database as much as possible.'
|
|
Color = clCream
|
|
Color = clCream
|
|
Font.Height = -11
|
|
Font.Height = -11
|
|
ParentColor = False
|
|
ParentColor = False
|
|
@@ -249,28 +249,28 @@ object fmComparison: TfmComparison
|
|
WordWrap = True
|
|
WordWrap = True
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
object GroupBox2: TGroupBox
|
|
- Left = 528
|
|
|
|
|
|
+ Left = 504
|
|
Height = 76
|
|
Height = 76
|
|
Top = 195
|
|
Top = 195
|
|
- Width = 168
|
|
|
|
|
|
+ Width = 199
|
|
Caption = 'Options'
|
|
Caption = 'Options'
|
|
- ClientHeight = 58
|
|
|
|
- ClientWidth = 164
|
|
|
|
|
|
+ ClientHeight = 57
|
|
|
|
+ ClientWidth = 195
|
|
TabOrder = 6
|
|
TabOrder = 6
|
|
object cxIgnoreLength: TCheckBox
|
|
object cxIgnoreLength: TCheckBox
|
|
Left = 11
|
|
Left = 11
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Top = 1
|
|
Top = 1
|
|
- Width = 113
|
|
|
|
|
|
+ Width = 154
|
|
Caption = 'Ignore fields length'
|
|
Caption = 'Ignore fields length'
|
|
TabOrder = 0
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object cxRemovedObjects: TCheckBox
|
|
object cxRemovedObjects: TCheckBox
|
|
Left = 11
|
|
Left = 11
|
|
- Height = 17
|
|
|
|
|
|
+ Height = 24
|
|
Hint = 'Check objects present in source but removed in target database'
|
|
Hint = 'Check objects present in source but removed in target database'
|
|
Top = 22
|
|
Top = 22
|
|
- Width = 132
|
|
|
|
|
|
+ Width = 182
|
|
Caption = 'Check removed objects'
|
|
Caption = 'Check removed objects'
|
|
ParentShowHint = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
ShowHint = True
|