470 lines
11 KiB
Plaintext
470 lines
11 KiB
Plaintext
object ServiceMethods_ServerMainForm: TServiceMethods_ServerMainForm
|
|
Left = 270
|
|
Top = 153
|
|
AutoScroll = False
|
|
Caption = 'ServiceMethods Server'
|
|
ClientHeight = 435
|
|
ClientWidth = 596
|
|
Color = clBtnFace
|
|
Constraints.MinWidth = 604
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Memo: TMemo
|
|
Left = 0
|
|
Top = 250
|
|
Width = 596
|
|
Height = 129
|
|
Align = alBottom
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
ScrollBars = ssVertical
|
|
TabOrder = 6
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
Left = 202
|
|
Top = 2
|
|
Width = 390
|
|
Height = 220
|
|
Caption = 'Log events:'
|
|
TabOrder = 1
|
|
object cbAfterReleaseConnection: TCheckBox
|
|
Left = 198
|
|
Top = 149
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterReleaseConnection'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 20
|
|
end
|
|
object cbAfterProcessDeltas: TCheckBox
|
|
Left = 198
|
|
Top = 66
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterProcessDeltas'
|
|
TabOrder = 15
|
|
end
|
|
object cbAfterGetDatasetSchema: TCheckBox
|
|
Left = 198
|
|
Top = 15
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterGetDatasetSchema'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 12
|
|
end
|
|
object cbAfterGetDatasetData: TCheckBox
|
|
Left = 7
|
|
Top = 200
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterGetDatasetData'
|
|
TabOrder = 11
|
|
end
|
|
object cbAfterExecuteCommand: TCheckBox
|
|
Left = 198
|
|
Top = 100
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterExecuteCommand'
|
|
TabOrder = 17
|
|
end
|
|
object cbAfterAcquireConnection: TCheckBox
|
|
Left = 7
|
|
Top = 66
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AfterAcquireConnection'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 3
|
|
end
|
|
object cbBeforeReleaseConnection: TCheckBox
|
|
Left = 198
|
|
Top = 132
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeReleaseConnection'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 19
|
|
end
|
|
object cbBeforeProcessDeltas: TCheckBox
|
|
Left = 198
|
|
Top = 32
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeProcessDeltas'
|
|
TabOrder = 13
|
|
end
|
|
object cbBeforeGetDatasetSchema: TCheckBox
|
|
Left = 7
|
|
Top = 166
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeGetDatasetSchema'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 9
|
|
end
|
|
object cbBeforeGetDatasetData: TCheckBox
|
|
Left = 7
|
|
Top = 183
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeGetDatasetData'
|
|
TabOrder = 10
|
|
end
|
|
object cbBeforeExecuteCommand: TCheckBox
|
|
Left = 198
|
|
Top = 83
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeExecuteCommand'
|
|
TabOrder = 16
|
|
end
|
|
object cbBeforeAcquireConnection: TCheckBox
|
|
Left = 7
|
|
Top = 32
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BeforeAcquireConnection'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
end
|
|
object cbValidateCommandExecution: TCheckBox
|
|
Left = 7
|
|
Top = 100
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'ValidateCommandExecution'
|
|
TabOrder = 5
|
|
end
|
|
object cbUpdateDataRollBackTransaction: TCheckBox
|
|
Left = 7
|
|
Top = 132
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'UpdateDataRollBackTransaction'
|
|
TabOrder = 7
|
|
end
|
|
object cbUpdateDataCommitTransaction: TCheckBox
|
|
Left = 198
|
|
Top = 117
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'UpdateDataCommitTransaction'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 18
|
|
end
|
|
object cbUpdateDataBeginTransaction: TCheckBox
|
|
Left = 7
|
|
Top = 149
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'UpdateDataBeginTransaction'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 8
|
|
end
|
|
object cbProcessDeltasError: TCheckBox
|
|
Left = 198
|
|
Top = 49
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'ProcessDeltasError'
|
|
TabOrder = 14
|
|
end
|
|
object cbGetSchemaAsXMLEvent: TCheckBox
|
|
Left = 7
|
|
Top = 15
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'GetSchemaAsXMLEvent'
|
|
TabOrder = 0
|
|
end
|
|
object cbValidateDatasetAccess: TCheckBox
|
|
Left = 7
|
|
Top = 83
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'ValidateDatasetAccess'
|
|
TabOrder = 4
|
|
end
|
|
object cbValidateDirectSQLAccess: TCheckBox
|
|
Left = 7
|
|
Top = 117
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'ValidateDirectSQLAccess'
|
|
TabOrder = 6
|
|
end
|
|
object cbAcquireConnectionFailure: TCheckBox
|
|
Left = 7
|
|
Top = 49
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'AcquireConnectionFailure'
|
|
TabOrder = 2
|
|
end
|
|
object cbBusinessProcessorAutoCreated: TCheckBox
|
|
Left = 198
|
|
Top = 166
|
|
Width = 187
|
|
Height = 17
|
|
Caption = 'BusinessProcessorAutoCreated'
|
|
TabOrder = 21
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
Left = 2
|
|
Top = 2
|
|
Width = 197
|
|
Height = 220
|
|
Caption = 'Server options:'
|
|
TabOrder = 0
|
|
DesignSize = (
|
|
197
|
|
220)
|
|
object cbProcessDeltasErrorRaise: TCheckBox
|
|
Left = 5
|
|
Top = 134
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'Raise ProcessDeltasError'
|
|
TabOrder = 7
|
|
end
|
|
object cbProcessDeltasWithoutUpdateRules: TCheckBox
|
|
Left = 5
|
|
Top = 117
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'ProcessDeltasWithoutUpdateRules'
|
|
TabOrder = 6
|
|
end
|
|
object cbAllowExecuteCommands: TCheckBox
|
|
Left = 5
|
|
Top = 83
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowExecuteCommands'
|
|
TabOrder = 4
|
|
end
|
|
object cbAllowWhereSQL: TCheckBox
|
|
Left = 5
|
|
Top = 66
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowWhereSQL'
|
|
TabOrder = 3
|
|
end
|
|
object cbAllowExecuteSQL: TCheckBox
|
|
Left = 5
|
|
Top = 100
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowExecuteSQL'
|
|
TabOrder = 5
|
|
end
|
|
object cbAllowSchemaAccess: TCheckBox
|
|
Left = 5
|
|
Top = 15
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowSchemaAccess'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 0
|
|
end
|
|
object cbAllowDataAccess: TCheckBox
|
|
Left = 5
|
|
Top = 49
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowDataAccess'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 2
|
|
end
|
|
object cbAcquireConnection: TCheckBox
|
|
Left = 5
|
|
Top = 32
|
|
Width = 190
|
|
Height = 17
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AcquireConnection'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
end
|
|
object cbAllowDynamicSelect: TCheckBox
|
|
Left = 5
|
|
Top = 151
|
|
Width = 190
|
|
Height = 14
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowDynamicSelect'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 8
|
|
end
|
|
object cbAllowDynamicWhere: TCheckBox
|
|
Left = 5
|
|
Top = 168
|
|
Width = 190
|
|
Height = 14
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowDynamicWhere'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 9
|
|
end
|
|
object cbAllowUpdates: TCheckBox
|
|
Left = 5
|
|
Top = 185
|
|
Width = 190
|
|
Height = 14
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AllowUpdates'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 10
|
|
end
|
|
object cbAutoCreateBusinessProcessors: TCheckBox
|
|
Left = 5
|
|
Top = 202
|
|
Width = 190
|
|
Height = 14
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Caption = 'AutoCreateBusinessProcessors'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 11
|
|
end
|
|
end
|
|
object CheckAllOptionsButton: TButton
|
|
Left = 21
|
|
Top = 225
|
|
Width = 75
|
|
Height = 22
|
|
Caption = 'Check all'
|
|
TabOrder = 2
|
|
OnClick = CheckAllOptionsButtonClick
|
|
end
|
|
object CheckNoneOptionsButton: TButton
|
|
Left = 101
|
|
Top = 225
|
|
Width = 75
|
|
Height = 22
|
|
Caption = 'Check none'
|
|
TabOrder = 3
|
|
OnClick = CheckNoneOptionsButtonClick
|
|
end
|
|
object CheckAllEventsButton: TButton
|
|
Left = 323
|
|
Top = 225
|
|
Width = 74
|
|
Height = 22
|
|
Caption = 'Check all'
|
|
TabOrder = 4
|
|
OnClick = CheckAllEventsButtonClick
|
|
end
|
|
object CheckNoneEventsButton: TButton
|
|
Left = 402
|
|
Top = 225
|
|
Width = 76
|
|
Height = 22
|
|
Caption = 'Check none'
|
|
TabOrder = 5
|
|
OnClick = CheckNoneEventsButtonClick
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 379
|
|
Width = 596
|
|
Height = 56
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
TabOrder = 7
|
|
DesignSize = (
|
|
596
|
|
56)
|
|
object DAPoweredByDataAbstractButton2: TDAPoweredByDataAbstractButton
|
|
Left = 212
|
|
Top = 6
|
|
Width = 212
|
|
Height = 48
|
|
Cursor = crHandPoint
|
|
end
|
|
object ClearLogButton: TButton
|
|
Left = 515
|
|
Top = 3
|
|
Width = 75
|
|
Height = 22
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Clear log'
|
|
TabOrder = 0
|
|
OnClick = ClearLogButtonClick
|
|
end
|
|
end
|
|
object ConnectionManager: TDAConnectionManager
|
|
Connections = <
|
|
item
|
|
Name = 'Northwind'
|
|
ConnectionString =
|
|
'ADO?AuxDriver=SQLOLEDB.1;Server=localhost;Database=Northwind;Use' +
|
|
'rID=sa;Password=;'
|
|
Default = True
|
|
end>
|
|
DriverManager = DriverManager
|
|
PoolingEnabled = True
|
|
Left = 278
|
|
Top = 395
|
|
end
|
|
object DriverManager: TDADriverManager
|
|
DriverDirectory = '%SYSTEM%\'
|
|
TraceActive = False
|
|
TraceFlags = []
|
|
Left = 305
|
|
Top = 395
|
|
end
|
|
object ADODriver: TDAADODriver
|
|
Left = 389
|
|
Top = 395
|
|
end
|
|
object Server: TROIndyHTTPServer
|
|
Dispatchers = <
|
|
item
|
|
Name = 'Message'
|
|
Message = Message
|
|
Enabled = True
|
|
PathInfo = 'Bin'
|
|
end>
|
|
Port = 8099
|
|
Left = 333
|
|
Top = 395
|
|
end
|
|
object Message: TROBinMessage
|
|
Left = 361
|
|
Top = 395
|
|
end
|
|
end
|