ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/DBAdmin/DataModule.lfm
(Generate patch)

Comparing ibx/trunk/examples/DBAdmin/DataModule.lfm (file contents):
Revision 272 by tony, Mon Feb 4 13:34:37 2019 UTC vs.
Revision 273 by tony, Mon Feb 4 13:36:50 2019 UTC

# Line 4 | Line 4 | object DBDataModule: TDBDataModule
4    HorizontalOffset = 767
5    VerticalOffset = 395
6    Width = 730
7 +  PPI = 96
8    object IBDatabase1: TIBDatabase
9 <    Connected = False
9 >    Connected = True
10      AfterConnect = IBDatabase1AfterConnect
11      AfterDisconnect = IBDatabase1AfterDisconnect
12      BeforeDisconnect = IBDatabase1BeforeDisconnect
# Line 70 | Line 71 | object DBDataModule: TDBDataModule
71      DataSetCloseAction = dcSaveChanges
72      left = 288
73      top = 24
73    object DatabaseQueryRDBDESCRIPTION: TIBMemoField
74      FieldKind = fkData
75      FieldName = 'RDB$DESCRIPTION'
76      Index = 0
77      LookupCache = False
78      ProviderFlags = [pfInUpdate, pfInWhere]
79      ReadOnly = False
80      Required = False
81      BlobType = ftMemo
82      Size = 8
83      Transliterate = False
84      DisplayTextAsClassName = False
85    end
86    object DatabaseQueryRDBRELATION_ID: TIBSmallintField
87      FieldKind = fkData
88      FieldName = 'RDB$RELATION_ID'
89      Index = 1
90      LookupCache = False
91      ProviderFlags = [pfInUpdate, pfInWhere]
92      ReadOnly = False
93      Required = False
94    end
95    object DatabaseQueryRDBSECURITY_CLASS: TIBStringField
96      FieldKind = fkData
97      FieldName = 'RDB$SECURITY_CLASS'
98      Index = 2
99      LookupCache = False
100      ProviderFlags = [pfInUpdate, pfInWhere]
101      ReadOnly = False
102      Required = False
103      Size = 31
104    end
105    object DatabaseQueryRDBCHARACTER_SET_NAME: TIBStringField
106      FieldKind = fkData
107      FieldName = 'RDB$CHARACTER_SET_NAME'
108      Index = 3
109      LookupCache = False
110      ProviderFlags = [pfInUpdate, pfInWhere]
111      ReadOnly = False
112      Required = False
113      Size = 31
114    end
115    object DatabaseQueryRDBLINGER: TIBIntegerField
116      FieldKind = fkData
117      FieldName = 'RDB$LINGER'
118      Index = 4
119      LookupCache = False
120      ProviderFlags = [pfInUpdate, pfInWhere]
121      ReadOnly = False
122      Required = False
123    end
124    object DatabaseQueryMONDATABASE_NAME: TIBStringField
125      FieldKind = fkData
126      FieldName = 'MON$DATABASE_NAME'
127      Index = 5
128      LookupCache = False
129      ProviderFlags = [pfInUpdate, pfInWhere]
130      ReadOnly = False
131      Required = False
132      Size = 255
133    end
134    object DatabaseQueryMONPAGE_SIZE: TIBSmallintField
135      FieldKind = fkData
136      FieldName = 'MON$PAGE_SIZE'
137      Index = 6
138      LookupCache = False
139      ProviderFlags = [pfInUpdate, pfInWhere]
140      ReadOnly = False
141      Required = False
142    end
143    object DatabaseQueryMONODS_MAJOR: TIBSmallintField
144      FieldKind = fkData
145      FieldName = 'MON$ODS_MAJOR'
146      Index = 7
147      LookupCache = False
148      ProviderFlags = [pfInUpdate, pfInWhere]
149      ReadOnly = False
150      Required = False
151    end
152    object DatabaseQueryMONODS_MINOR: TIBSmallintField
153      FieldKind = fkData
154      FieldName = 'MON$ODS_MINOR'
155      Index = 8
156      LookupCache = False
157      ProviderFlags = [pfInUpdate, pfInWhere]
158      ReadOnly = False
159      Required = False
160    end
161    object DatabaseQueryMONOLDEST_TRANSACTION: TIBLargeIntField
162      FieldKind = fkData
163      FieldName = 'MON$OLDEST_TRANSACTION'
164      Index = 9
165      LookupCache = False
166      ProviderFlags = [pfInUpdate, pfInWhere]
167      ReadOnly = False
168      Required = False
169    end
170    object DatabaseQueryMONOLDEST_ACTIVE: TIBLargeIntField
171      FieldKind = fkData
172      FieldName = 'MON$OLDEST_ACTIVE'
173      Index = 10
174      LookupCache = False
175      ProviderFlags = [pfInUpdate, pfInWhere]
176      ReadOnly = False
177      Required = False
178    end
179    object DatabaseQueryMONOLDEST_SNAPSHOT: TIBLargeIntField
180      FieldKind = fkData
181      FieldName = 'MON$OLDEST_SNAPSHOT'
182      Index = 11
183      LookupCache = False
184      ProviderFlags = [pfInUpdate, pfInWhere]
185      ReadOnly = False
186      Required = False
187    end
188    object DatabaseQueryMONNEXT_TRANSACTION: TIBLargeIntField
189      FieldKind = fkData
190      FieldName = 'MON$NEXT_TRANSACTION'
191      Index = 12
192      LookupCache = False
193      ProviderFlags = [pfInUpdate, pfInWhere]
194      ReadOnly = False
195      Required = False
196    end
197    object DatabaseQueryMONPAGE_BUFFERS: TIBIntegerField
198      FieldKind = fkData
199      FieldName = 'MON$PAGE_BUFFERS'
200      Index = 13
201      LookupCache = False
202      ProviderFlags = [pfInUpdate, pfInWhere]
203      ReadOnly = False
204      Required = False
205    end
206    object DatabaseQueryMONSQL_DIALECT: TIBSmallintField
207      FieldKind = fkData
208      FieldName = 'MON$SQL_DIALECT'
209      Index = 14
210      LookupCache = False
211      ProviderFlags = [pfInUpdate, pfInWhere]
212      ReadOnly = False
213      Required = False
214    end
215    object DatabaseQueryMONSHUTDOWN_MODE: TIBSmallintField
216      FieldKind = fkData
217      FieldName = 'MON$SHUTDOWN_MODE'
218      Index = 15
219      LookupCache = False
220      ProviderFlags = [pfInUpdate, pfInWhere]
221      ReadOnly = False
222      Required = False
223    end
224    object DatabaseQueryMONSWEEP_INTERVAL: TIBIntegerField
225      FieldKind = fkData
226      FieldName = 'MON$SWEEP_INTERVAL'
227      Index = 16
228      LookupCache = False
229      ProviderFlags = [pfInUpdate, pfInWhere]
230      ReadOnly = False
231      Required = False
232    end
233    object DatabaseQueryMONREAD_ONLY: TIBSmallintField
234      FieldKind = fkData
235      FieldName = 'MON$READ_ONLY'
236      Index = 17
237      LookupCache = False
238      ProviderFlags = [pfInUpdate, pfInWhere]
239      ReadOnly = False
240      Required = False
241    end
242    object DatabaseQueryMONFORCED_WRITES: TIBSmallintField
243      FieldKind = fkData
244      FieldName = 'MON$FORCED_WRITES'
245      Index = 18
246      LookupCache = False
247      ProviderFlags = [pfInUpdate, pfInWhere]
248      ReadOnly = False
249      Required = False
250    end
251    object DatabaseQueryMONRESERVE_SPACE: TIBSmallintField
252      FieldKind = fkData
253      FieldName = 'MON$RESERVE_SPACE'
254      Index = 19
255      LookupCache = False
256      ProviderFlags = [pfInUpdate, pfInWhere]
257      ReadOnly = False
258      Required = False
259    end
260    object DatabaseQueryMONCREATION_DATE: TDateTimeField
261      FieldKind = fkData
262      FieldName = 'MON$CREATION_DATE'
263      Index = 20
264      LookupCache = False
265      ProviderFlags = [pfInUpdate, pfInWhere]
266      ReadOnly = False
267      Required = False
268      OnGetText = DatabaseQueryMONCREATION_DATEGetText
269    end
270    object DatabaseQueryMONPAGES: TIBLargeIntField
271      FieldKind = fkData
272      FieldName = 'MON$PAGES'
273      Index = 21
274      LookupCache = False
275      ProviderFlags = [pfInUpdate, pfInWhere]
276      ReadOnly = False
277      Required = False
278    end
279    object DatabaseQueryMONSTAT_ID: TIBIntegerField
280      FieldKind = fkData
281      FieldName = 'MON$STAT_ID'
282      Index = 22
283      LookupCache = False
284      ProviderFlags = [pfInUpdate, pfInWhere]
285      ReadOnly = False
286      Required = False
287    end
288    object DatabaseQueryMONBACKUP_STATE: TIBSmallintField
289      FieldKind = fkData
290      FieldName = 'MON$BACKUP_STATE'
291      Index = 23
292      LookupCache = False
293      ProviderFlags = [pfInUpdate, pfInWhere]
294      ReadOnly = False
295      Required = False
296    end
297    object DatabaseQueryMONCRYPT_PAGE: TIBLargeIntField
298      FieldKind = fkData
299      FieldName = 'MON$CRYPT_PAGE'
300      Index = 24
301      LookupCache = False
302      ProviderFlags = [pfInUpdate, pfInWhere]
303      ReadOnly = False
304      Required = False
305    end
306    object DatabaseQueryMONOWNER: TIBStringField
307      FieldKind = fkData
308      FieldName = 'MON$OWNER'
309      Index = 25
310      LookupCache = False
311      ProviderFlags = [pfInUpdate, pfInWhere]
312      ReadOnly = False
313      Required = False
314      Size = 31
315    end
316    object DatabaseQueryMONSEC_DATABASE: TIBStringField
317      FieldKind = fkData
318      FieldName = 'MON$SEC_DATABASE'
319      Index = 26
320      LookupCache = False
321      ProviderFlags = [pfInUpdate, pfInWhere]
322      ReadOnly = False
323      Required = True
324      Size = 7
325    end
74    end
75    object DBCharSet: TIBQuery
76      AllowAutoActivateTransaction = False

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines