Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 328 lines (327 sloc) 7.253 kb
2507560 first commit
Motaz Abdel Azeem authored
1 object fmPermissionManage: TfmPermissionManage
2 Left = 474
3 Height = 361
4 Top = 204
5 Width = 523
6 Caption = 'Permission Management'
7 ClientHeight = 361
8 ClientWidth = 523
9 OnClose = FormClose
10 Position = poScreenCenter
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
11 LCLVersion = '0.9.31'
2507560 first commit
Motaz Abdel Azeem authored
12 object PageControl1: TPageControl
13 Left = 0
14 Height = 361
15 Top = 0
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
16 Width = 501
407fc29 Assign ATab object variable when queryWindow is already opened:
Motaz Abdel Azeem authored
17 ActivePage = tsTables
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
18 Anchors = [akTop, akLeft, akRight, akBottom]
407fc29 Assign ATab object variable when queryWindow is already opened:
Motaz Abdel Azeem authored
19 TabIndex = 0
2507560 first commit
Motaz Abdel Azeem authored
20 TabOrder = 0
21 object tsTables: TTabSheet
22 Caption = 'Tables'
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
23 ClientHeight = 330
24 ClientWidth = 497
2507560 first commit
Motaz Abdel Azeem authored
25 object Label1: TLabel
26 Left = 12
27 Height = 18
28 Top = 10
29 Width = 67
30 Caption = 'User/Role'
31 ParentColor = False
32 end
33 object Label2: TLabel
34 Left = 14
35 Height = 18
36 Top = 95
37 Width = 37
38 Caption = 'Table'
39 ParentColor = False
40 end
41 object cbTables: TComboBox
42 Left = 18
43 Height = 31
44 Top = 124
45 Width = 156
46 ItemHeight = 0
47 OnChange = cbTablesChange
48 Style = csDropDownList
49 TabOrder = 0
50 end
51 object Label3: TLabel
52 Left = 308
53 Height = 18
54 Top = 10
55 Width = 83
56 Caption = 'Permissions'
57 ParentColor = False
58 end
59 object cxSelect: TCheckBox
60 Left = 317
61 Height = 22
62 Top = 86
63 Width = 65
64 Caption = 'Select'
65 TabOrder = 1
66 end
67 object cxInsert: TCheckBox
68 Left = 318
69 Height = 22
70 Top = 138
71 Width = 63
72 Caption = 'Insert'
73 TabOrder = 2
74 end
75 object cxUpdate: TCheckBox
76 Left = 317
77 Height = 22
78 Top = 183
79 Width = 74
80 Caption = 'Update'
81 TabOrder = 3
82 end
83 object cxDelete: TCheckBox
84 Left = 317
85 Height = 22
86 Top = 236
87 Width = 68
88 Caption = 'Delete'
89 TabOrder = 4
90 end
91 object cxReferences: TCheckBox
92 Left = 318
93 Height = 22
94 Top = 287
95 Width = 99
96 Caption = 'References'
97 TabOrder = 5
98 end
99 object bbApplyTable: TBitBtn
100 Left = 6
101 Height = 30
102 Top = 287
103 Width = 75
104 Caption = 'Apply'
105 Kind = bkOK
106 OnClick = bbApplyTableClick
107 TabOrder = 6
108 end
109 object cbUsers: TComboBox
110 Left = 18
111 Height = 29
112 Top = 34
113 Width = 156
114 ItemHeight = 0
115 OnChange = cbTablesChange
116 TabOrder = 7
117 end
118 object cxSelectGrant: TCheckBox
119 Left = 345
120 Height = 22
121 Top = 102
122 Width = 97
123 Caption = 'With Grant'
124 TabOrder = 8
125 end
126 object cxInsertGrant: TCheckBox
127 Left = 345
128 Height = 22
129 Top = 154
130 Width = 97
131 Caption = 'With Grant'
132 TabOrder = 9
133 end
134 object cxUpdateGrant: TCheckBox
135 Left = 345
136 Height = 22
137 Top = 202
138 Width = 97
139 Caption = 'With Grant'
140 TabOrder = 10
141 end
142 object cxDeleteGrant: TCheckBox
143 Left = 342
144 Height = 22
145 Top = 253
146 Width = 97
147 Caption = 'With Grant'
148 TabOrder = 11
149 end
150 object cxReferencesGrant: TCheckBox
151 Left = 345
152 Height = 22
153 Top = 305
154 Width = 97
155 Caption = 'With Grant'
156 TabOrder = 12
157 end
158 object cxAll: TCheckBox
159 Left = 318
160 Height = 22
161 Top = 34
162 Width = 45
163 Caption = 'All'
164 Font.Style = [fsBold]
165 ParentFont = False
166 TabOrder = 13
167 end
168 object cxAllGrant: TCheckBox
169 Left = 345
170 Height = 22
171 Top = 49
172 Width = 102
173 Caption = 'With Grant'
174 Font.Style = [fsBold]
175 ParentFont = False
176 TabOrder = 14
177 end
178 end
179 object tsProcedures: TTabSheet
180 Caption = 'Procedures'
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
181 ClientHeight = 330
182 ClientWidth = 497
2507560 first commit
Motaz Abdel Azeem authored
183 object Label4: TLabel
184 Left = 12
185 Height = 18
186 Top = 10
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
187 Width = 67
2507560 first commit
Motaz Abdel Azeem authored
188 Caption = 'User/Role'
189 ParentColor = False
190 end
191 object cbProcUsers: TComboBox
192 Left = 18
193 Height = 29
194 Top = 34
195 Width = 156
196 ItemHeight = 0
197 OnChange = cbProcUsersChange
198 TabOrder = 0
199 end
200 object Label5: TLabel
201 Left = 230
202 Height = 18
203 Top = 11
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
204 Width = 83
2507560 first commit
Motaz Abdel Azeem authored
205 Caption = 'Permissions'
206 ParentColor = False
207 end
208 object clbProcedures: TCheckListBox
209 Left = 246
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
210 Height = 232
2507560 first commit
Motaz Abdel Azeem authored
211 Top = 39
212 Width = 211
213 Anchors = [akTop, akLeft, akBottom]
214 ItemHeight = 0
215 OnClick = clbProceduresClick
216 OnKeyUp = clbProceduresKeyUp
217 TabOrder = 1
218 TopIndex = -1
219 end
220 object bbApplyProc: TBitBtn
221 Left = 13
222 Height = 30
223 Top = 275
224 Width = 75
225 Caption = 'Apply'
226 Kind = bkOK
227 OnClick = bbApplyProcClick
228 TabOrder = 2
229 end
230 object cxProcGrant: TCheckBox
231 Left = 246
232 Height = 22
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
233 Top = 283
234 Width = 97
2507560 first commit
Motaz Abdel Azeem authored
235 Anchors = [akLeft, akBottom]
236 Caption = 'With Grant'
237 OnChange = cxProcGrantChange
238 TabOrder = 3
239 end
240 end
241 object tsRoles: TTabSheet
242 Caption = 'Roles'
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
243 ClientHeight = 330
244 ClientWidth = 497
2507560 first commit
Motaz Abdel Azeem authored
245 object Label6: TLabel
246 Left = 12
247 Height = 18
248 Top = 10
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
249 Width = 32
2507560 first commit
Motaz Abdel Azeem authored
250 Caption = 'User'
251 ParentColor = False
252 end
253 object cbRolesUser: TComboBox
254 Left = 18
255 Height = 29
256 Top = 34
257 Width = 156
258 ItemHeight = 0
259 OnChange = cbRolesUserChange
260 TabOrder = 0
261 end
262 object Label7: TLabel
263 Left = 230
264 Height = 18
265 Top = 11
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
266 Width = 83
2507560 first commit
Motaz Abdel Azeem authored
267 Caption = 'Permissions'
268 ParentColor = False
269 end
270 object bbApplyRoles: TBitBtn
271 Left = 12
272 Height = 30
273 Top = 283
274 Width = 75
275 Caption = 'Apply'
276 Default = True
277 Kind = bkOK
278 OnClick = bbApplyRolesClick
279 TabOrder = 1
280 end
281 object clbRoles: TCheckListBox
282 Left = 246
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
283 Height = 237
2507560 first commit
Motaz Abdel Azeem authored
284 Top = 39
285 Width = 211
286 Anchors = [akTop, akLeft, akBottom]
287 ItemHeight = 0
288 OnClick = clbRolesClick
289 OnKeyUp = clbRolesKeyUp
290 TabOrder = 2
291 TopIndex = -1
292 end
293 object BitBtn1: TBitBtn
294 Left = 99
295 Height = 30
296 Top = 283
297 Width = 75
298 Caption = 'Refresh'
299 OnClick = BitBtn1Click
300 TabOrder = 3
301 end
302 object cxRoleGrant: TCheckBox
303 Left = 246
304 Height = 22
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
305 Top = 291
306 Width = 103
2507560 first commit
Motaz Abdel Azeem authored
307 Anchors = [akLeft, akBottom]
308 Caption = 'With Admin'
309 OnChange = cxRoleGrantChange
310 TabOrder = 4
311 end
312 end
313 end
c64228c Display Table Management in page tab
Motaz Abdel Azeem authored
314 object bbClose: TBitBtn
315 Left = 496
316 Height = 24
317 Top = 0
318 Width = 27
319 Anchors = [akTop, akRight]
320 Caption = ' X '
321 Color = 16249563
322 Font.Style = [fsBold]
323 OnClick = bbCloseClick
324 ParentFont = False
325 TabOrder = 1
326 end
2507560 first commit
Motaz Abdel Azeem authored
327 end
Something went wrong with that request. Please try again.