ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibinsertsqleditor.lfm
Revision: 101
Committed: Thu Jan 18 14:37:18 2018 UTC (6 years, 3 months ago) by tony
File size: 2610 byte(s)
Log Message:
Fixes merged for support of Identity Columns

File Contents

# User Rev Content
1 tony 80 inherited IBInsertSQLEditorForm: TIBInsertSQLEditorForm
2 tony 101 Left = 307
3     Top = 274
4 tony 5 Caption = 'Insert SQL Editor'
5 tony 80 inherited GenerateBtn: TButton
6 tony 7 OnClick = GenerateBtnClick
7 tony 5 end
8 tony 80 inherited PageControl: TPageControl
9     inherited SelectPage: TTabSheet
10 tony 101 inherited Label4: TLabel
11     Left = 8
12     Top = 240
13     Width = 103
14     Caption = 'Identity Columns'
15     end
16 tony 80 inherited FieldNamesGrid: TIBDynamicGrid
17 tony 101 Height = 112
18 tony 21 end
19 tony 80 inherited PrimaryKeysGrid: TIBDynamicGrid
20 tony 101 Left = 8
21     Top = 256
22     DataSource = IBSQLEditFrame.IdentityColsSource
23 tony 21 end
24 tony 80 inherited SelectSelectAll: TCheckBox
25 tony 101 Top = 200
26 tony 21 end
27     end
28 tony 80 inherited ExecutePage: TTabSheet
29     inherited Label18: TLabel
30     Visible = False
31 tony 21 end
32 tony 80 inherited SelectProcedure: TLabel
33     Visible = True
34 tony 21 end
35 tony 80 inherited InputProcGrid: TIBDynamicGrid
36     Height = 224
37 tony 21 end
38 tony 80 inherited OutputProcGrid: TIBDynamicGrid
39 tony 21 Visible = False
40     end
41     end
42     end
43 tony 80 inherited IBSQLEditFrame1: TIBSQLEditFrame
44     Left = 282
45     Height = 339
46     Top = 24
47     Width = 448
48     Anchors = [akTop, akLeft, akRight, akBottom]
49     ClientHeight = 339
50     ClientWidth = 448
51     TabOrder = 7
52 tony 101 DesignLeft = 1974
53     DesignTop = 200
54 tony 80 inherited SQLText: TSynEdit
55     Height = 313
56     Width = 448
57     end
58     inherited ToolBar1: TToolBar
59     Width = 448
60     end
61     inherited FieldNameList: TIBQuery
62     ParamData = <
63     item
64     DataType = ftUnknown
65     Name = 'RDB$RELATION_NAME'
66     ParamType = ptInput
67     end>
68     end
69     inherited PrimaryKeys: TIBQuery
70     ParamData = <
71     item
72     DataType = ftUnknown
73     Name = 'RDB$RELATION_NAME'
74     ParamType = ptInput
75     end>
76     end
77     inherited UserProcedures: TIBQuery
78     AfterScroll = UserProceduresAfterScroll
79     end
80     inherited ProcInputParams: TIBQuery
81     ParamData = <
82     item
83     DataType = ftUnknown
84     Name = 'RDB$PROCEDURE_NAME'
85     ParamType = ptInput
86     end>
87     end
88     inherited ProcOutputParams: TIBQuery
89     ParamData = <
90     item
91     DataType = ftUnknown
92     Name = 'RDB$PROCEDURE_NAME'
93     ParamType = ptInput
94     end>
95     end
96     inherited SQLTransaction: TIBTransaction
97     Params.Strings = ( )
98     end
99 tony 101 inherited IdentityCols: TIBQuery
100     ParamData = <
101     item
102     DataType = ftUnknown
103     Name = 'RDB$RELATION_NAME'
104     ParamType = ptInput
105     end>
106     end
107 tony 7 end
108 tony 5 end