Oracle Data Access Components Source Code
ODAC v.6.70.0.45
源代码在线查看： umain.dfm
inherited fmMain: TfmMain
Width = 635
Height = 560
OnCreate = IWAppFormCreate
DesignLeft = 226
DesignTop = 76
inherited IWRectangle: TIWRectangle
Width = 614
end
inherited lbPageName: TIWLabel
Left = 586
Width = 33
Caption = 'Main'
end
inherited rgConnection: TIWRegion
Width = 609
inherited IWRectangle4: TIWRectangle
Width = 607
end
end
object IWRegion4: TIWRegion
Left = 16
Top = 126
Width = 311
Height = 126
Anchors = [akLeft, akTop, akRight]
TabOrder = 1
Color = clBlack
DesignSize = (
311
126)
object IWRectangle3: TIWRectangle
Left = 1
Top = 1
Width = 309
Height = 124
Anchors = [akLeft, akTop, akRight, akBottom]
ShowHint = True
ParentShowHint = False
ZIndex = -1
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Color = 14811135
Alignment = taLeftJustify
VAlign = vaMiddle
end
object edUsername: TIWEdit
Left = 112
Top = 17
Width = 163
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edUsername'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 2
PasswordPrompt = False
end
object IWLabel1: TIWLabel
Left = 20
Top = 19
Width = 81
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Username'
RawText = False
end
object IWLabel2: TIWLabel
Left = 20
Top = 54
Width = 77
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Password'
RawText = False
end
object edPassword: TIWEdit
Left = 112
Top = 52
Width = 163
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edPassword'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 3
PasswordPrompt = True
end
object IWLabel3: TIWLabel
Left = 20
Top = 89
Width = 52
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Server'
RawText = False
end
object edServer: TIWEdit
Left = 112
Top = 87
Width = 163
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edServer'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 4
PasswordPrompt = False
end
end
object IWRegion1: TIWRegion
Left = 336
Top = 126
Width = 289
Height = 280
Anchors = [akTop, akRight]
TabOrder = 2
Color = clBlack
DesignSize = (
289
280)
object IWRectangle1: TIWRectangle
Left = 1
Top = 1
Width = 287
Height = 278
Anchors = [akLeft, akTop, akRight, akBottom]
ShowHint = True
ParentShowHint = False
ZIndex = -1
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Color = 14811135
Alignment = taLeftJustify
VAlign = vaMiddle
end
object cbDisconnectedMode: TIWCheckBox
Left = 8
Top = 8
Width = 164
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
Caption = 'DisconnectedMode'
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
ScriptEvents =
DoSubmitValidation = True
Style = stNormal
TabOrder = 5
Checked = False
end
object cbFailover: TIWCheckBox
Left = 8
Top = 35
Width = 121
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
Caption = 'Failover'
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
ScriptEvents =
DoSubmitValidation = True
Style = stNormal
TabOrder = 6
Checked = False
end
object cbPooling: TIWCheckBox
Left = 8
Top = 62
Width = 121
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
Caption = 'Pooling'
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
ScriptEvents =
DoSubmitValidation = True
Style = stNormal
TabOrder = 7
Checked = False
end
object edConnectionLifeTime: TIWEdit
Left = 157
Top = 88
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edConnectionLifeTime'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 8
PasswordPrompt = False
Text = 'edConnectionLifeTime'
end
object IWLabel4: TIWLabel
Left = 26
Top = 90
Width = 140
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'ConnectionLifeTime'
RawText = False
end
object edMaxPoolSize: TIWEdit
Left = 157
Top = 115
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edMaxPoolSize'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 9
PasswordPrompt = False
Text = 'edMaxPoolSize'
end
object edMinPoolSize: TIWEdit
Left = 157
Top = 142
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edMinPoolSize'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 10
PasswordPrompt = False
Text = 'edMinPoolSize'
end
object IWLabel6: TIWLabel
Left = 26
Top = 117
Width = 88
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'MaxPoolSize'
RawText = False
end
object IWLabel7: TIWLabel
Left = 26
Top = 144
Width = 83
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'MinPoolSize'
RawText = False
end
object coPoolType: TIWComboBox
Left = 157
Top = 169
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
ItemsHaveValues = False
NoSelectionText = '-- No Selection --'
RequireSelection = True
ScriptEvents =
UseSize = False
DoSubmitValidation = True
Editable = True
TabOrder = 11
ItemIndex = 0
Items.Strings = (
'Local'
'MTS'
'OCI')
Sorted = False
end
object edProxyUsername: TIWEdit
Left = 157
Top = 196
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edProxyUsername'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 12
PasswordPrompt = False
Text = 'edProxyUsername'
end
object edProxyPassword: TIWEdit
Left = 157
Top = 223
Width = 101
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
FriendlyName = 'edProxyPassword'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents =
TabOrder = 13
PasswordPrompt = False
Text = 'edProxyPassword'
end
object cbValidate: TIWCheckBox
Left = 157
Top = 253
Width = 33
Height = 21
ShowHint = True
ParentShowHint = False
ZIndex = 0
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
ScriptEvents =
DoSubmitValidation = True
Style = stNormal
TabOrder = 14
Checked = False
end
object IWLabel8: TIWLabel
Left = 26
Top = 171
Width = 66
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'PoolType'
RawText = False
end
object IWLabel9: TIWLabel
Left = 26
Top = 198
Width = 110
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'ProxyUsername'
RawText = False
end
object IWLabel10: TIWLabel
Left = 26
Top = 225
Width = 107
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'ProxyPassword'
RawText = False
end
object IWLabel11: TIWLabel
Left = 26
Top = 251
Width = 58
Height = 16
ShowHint = True
ParentShowHint = False
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
Caption = 'Validate'
RawText = False
end
end
end
