2018-10-23 16:18:34 +02:00
|
|
|
object MainForm: TMainForm
|
|
|
|
Left = 0
|
|
|
|
Top = 0
|
|
|
|
Caption = 'TMVCActiveRecord - ShowCase'
|
2020-08-13 17:40:02 +02:00
|
|
|
ClientHeight = 640
|
2018-10-23 16:18:34 +02:00
|
|
|
ClientWidth = 635
|
|
|
|
Color = clBtnFace
|
|
|
|
Font.Charset = DEFAULT_CHARSET
|
|
|
|
Font.Color = clWindowText
|
|
|
|
Font.Height = -11
|
|
|
|
Font.Name = 'Tahoma'
|
|
|
|
Font.Style = []
|
|
|
|
OldCreateOrder = False
|
2019-01-08 12:48:27 +01:00
|
|
|
OnDestroy = FormDestroy
|
2019-09-13 15:17:56 +02:00
|
|
|
OnShow = FormShow
|
2018-10-23 16:18:34 +02:00
|
|
|
DesignSize = (
|
|
|
|
635
|
2020-08-13 17:40:02 +02:00
|
|
|
640)
|
2018-10-23 16:18:34 +02:00
|
|
|
PixelsPerInch = 96
|
|
|
|
TextHeight = 13
|
|
|
|
object btnCRUD: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 8
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'CRUD'
|
|
|
|
TabOrder = 0
|
|
|
|
OnClick = btnCRUDClick
|
|
|
|
end
|
|
|
|
object btnSelect: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 203
|
2018-10-23 16:18:34 +02:00
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'Queries'
|
|
|
|
TabOrder = 1
|
|
|
|
OnClick = btnSelectClick
|
|
|
|
end
|
|
|
|
object Memo1: TMemo
|
|
|
|
Left = 135
|
|
|
|
Top = 8
|
|
|
|
Width = 492
|
2020-08-13 17:40:02 +02:00
|
|
|
Height = 624
|
2018-10-23 16:18:34 +02:00
|
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
2019-12-17 17:34:23 +01:00
|
|
|
Ctl3D = True
|
|
|
|
DoubleBuffered = True
|
2018-10-23 16:18:34 +02:00
|
|
|
Font.Charset = ANSI_CHARSET
|
|
|
|
Font.Color = clWindowText
|
|
|
|
Font.Height = -13
|
|
|
|
Font.Name = 'Consolas'
|
|
|
|
Font.Style = []
|
2019-12-17 17:34:23 +01:00
|
|
|
ParentCtl3D = False
|
|
|
|
ParentDoubleBuffered = False
|
2018-10-23 16:18:34 +02:00
|
|
|
ParentFont = False
|
2019-12-17 17:34:23 +01:00
|
|
|
ReadOnly = True
|
|
|
|
ScrollBars = ssBoth
|
2018-10-23 16:18:34 +02:00
|
|
|
TabOrder = 2
|
2019-12-17 17:34:23 +01:00
|
|
|
WantReturns = False
|
|
|
|
WordWrap = False
|
2018-10-23 16:18:34 +02:00
|
|
|
end
|
|
|
|
object btnRelations: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 242
|
2018-10-23 16:18:34 +02:00
|
|
|
Width = 121
|
|
|
|
Height = 35
|
|
|
|
Caption = 'Relations'
|
|
|
|
TabOrder = 3
|
|
|
|
OnClick = btnRelationsClick
|
|
|
|
end
|
|
|
|
object btnInheritance: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 283
|
2018-10-23 16:18:34 +02:00
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'Inheritance'
|
|
|
|
TabOrder = 4
|
|
|
|
OnClick = btnInheritanceClick
|
|
|
|
end
|
|
|
|
object btnValidation: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 323
|
2018-10-23 16:18:34 +02:00
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'Validation'
|
|
|
|
TabOrder = 5
|
|
|
|
OnClick = btnValidationClick
|
|
|
|
end
|
|
|
|
object btnMultiThreading: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 403
|
2018-10-23 16:18:34 +02:00
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'Multi Threading'
|
|
|
|
TabOrder = 6
|
|
|
|
OnClick = btnMultiThreadingClick
|
|
|
|
end
|
2018-11-02 21:43:09 +01:00
|
|
|
object btnRQL: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 363
|
2018-11-02 21:43:09 +01:00
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'RQL Query'
|
|
|
|
TabOrder = 7
|
|
|
|
OnClick = btnRQLClick
|
|
|
|
end
|
2019-02-21 20:17:11 +01:00
|
|
|
object btnTransientFields: TButton
|
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 164
|
2019-02-21 20:17:11 +01:00
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'CRUD Transient'
|
|
|
|
TabOrder = 8
|
|
|
|
OnClick = btnTransientFieldsClick
|
|
|
|
end
|
2020-01-06 16:49:18 +01:00
|
|
|
object btnNullTest: TButton
|
2020-01-04 12:53:53 +01:00
|
|
|
Left = 8
|
2020-04-08 18:04:45 +02:00
|
|
|
Top = 443
|
2020-01-04 12:53:53 +01:00
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'Nullables'
|
2020-01-06 16:49:18 +01:00
|
|
|
TabOrder = 9
|
2020-01-04 12:53:53 +01:00
|
|
|
OnClick = btnNullTestClick
|
|
|
|
end
|
2020-03-27 00:37:28 +01:00
|
|
|
object btnCRUDNoAutoInc: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 47
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'CRUD (no autoinc)'
|
|
|
|
TabOrder = 10
|
|
|
|
OnClick = btnCRUDNoAutoIncClick
|
|
|
|
end
|
2020-03-31 16:23:22 +02:00
|
|
|
object btnCRUDWithStringPKs: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 86
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'CRUD (string pks)'
|
|
|
|
TabOrder = 11
|
|
|
|
OnClick = btnCRUDWithStringPKsClick
|
|
|
|
end
|
2020-04-08 18:04:45 +02:00
|
|
|
object btnWithSpaces: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 125
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'CRUD (entity with spaces)'
|
|
|
|
TabOrder = 12
|
|
|
|
WordWrap = True
|
|
|
|
OnClick = btnWithSpacesClick
|
|
|
|
end
|
2020-06-19 19:31:34 +02:00
|
|
|
object btnCountWithRQL: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 483
|
|
|
|
Width = 121
|
|
|
|
Height = 34
|
|
|
|
Caption = 'Count with RQL'
|
|
|
|
TabOrder = 13
|
|
|
|
OnClick = btnCountWithRQLClick
|
|
|
|
end
|
2020-08-11 00:54:42 +02:00
|
|
|
object btnReadAndWriteOnly: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 523
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'R/O, R/W'
|
|
|
|
TabOrder = 14
|
|
|
|
OnClick = btnReadAndWriteOnlyClick
|
|
|
|
end
|
2020-08-13 17:40:02 +02:00
|
|
|
object btnClientGeneratedPK: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 562
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'Client Generated PKs'
|
|
|
|
TabOrder = 15
|
|
|
|
OnClick = btnClientGeneratedPKClick
|
|
|
|
end
|
2020-08-28 18:04:29 +02:00
|
|
|
object btnAttributes: TButton
|
|
|
|
Left = 8
|
|
|
|
Top = 599
|
|
|
|
Width = 121
|
|
|
|
Height = 33
|
|
|
|
Caption = 'Attributes'
|
|
|
|
TabOrder = 16
|
|
|
|
OnClick = btnAttributesClick
|
|
|
|
end
|
2018-10-23 16:18:34 +02:00
|
|
|
object FDConnection1: TFDConnection
|
2020-10-24 14:21:02 +02:00
|
|
|
Left = 192
|
2019-06-24 20:59:33 +02:00
|
|
|
Top = 56
|
2018-10-23 16:18:34 +02:00
|
|
|
end
|
|
|
|
end
|