📄 iwmainform.dfm
字号:
object formMain: TformMain
Left = 0
Top = 0
Width = 633
Height = 430
Background.Fixed = False
HandleTabs = False
SupportedBrowsers = [brIE, brNetscape6]
DesignSize = (
633
430)
DesignLeft = 41
DesignTop = 130
object IWRectangle3: TIWRectangle
Left = 12
Top = 72
Width = 293
Height = 181
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Color = clBlack
Alignment = taLeftJustify
VAlign = vaMiddle
end
object IWRectangle2: TIWRectangle
Left = 13
Top = 73
Width = 291
Height = 179
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
Color = clInfoBk
Alignment = taLeftJustify
VAlign = vaMiddle
end
object IWRectangle1: TIWRectangle
Left = 12
Top = 16
Width = 612
Height = 28
Anchors = [akLeft, akTop, akRight]
ZIndex = 0
Font.Color = clHighlight
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 12
Font.Style = [fsBold]
Color = clSkyBlue
Alignment = taLeftJustify
VAlign = vaMiddle
end
object edUsername: TIWEdit
Left = 116
Top = 92
Width = 166
Height = 21
ZIndex = 1
BGColor = clNone
DoSubmitValidation = True
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
FriendlyName = 'edUsername'
MaxLength = 0
ReadOnly = False
Required = False
ScriptEvents = <>
TabOrder = 0
PasswordPrompt = False
Text = 'scott'
end
object edPassword: TIWEdit
Left = 116
Top = 132
Width = 166
Height = 21
ZIndex = 1
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 = 1
PasswordPrompt = True
Text = 'tiger'
end
object edServer: TIWEdit
Left = 116
Top = 172
Width = 166
Height = 21
ZIndex = 1
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 = 2
PasswordPrompt = False
Text = 'ora'
end
object memSQL: TIWMemo
Left = 320
Top = 88
Width = 285
Height = 133
Anchors = [akLeft, akTop, akRight]
ZIndex = 0
Editable = True
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = []
ScriptEvents = <>
RawText = False
ReadOnly = False
Required = False
TabOrder = 3
WantReturns = False
FriendlyName = 'memSQL'
Lines.Strings = (
'select * from scott.emp')
end
object IWDBNavigator: TIWDBNavigator
Left = 392
Top = 272
Width = 230
Height = 24
Anchors = [akTop, akRight]
Visible = False
ZIndex = 0
Confirmations.Delete = 'Are you sure you want to delete this record?'
Confirmations.Post = 'Are you sure you want to update this record?'
Confirmations.Cancel = 'Are you sure you want to cancel your changes to this record?'
DataSource = OraDataSource1
ImageHeight = 21
ImageWidth = 21
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
Orientation = orHorizontal
end
object IWDBGrid: TIWDBGrid
Left = 12
Top = 300
Width = 612
Height = 119
Anchors = [akLeft, akTop, akRight, akBottom]
Visible = False
ZIndex = 0
BorderColors.Color = clNone
BorderColors.Light = clNone
BorderColors.Dark = clBlack
BGColor = clSkyBlue
BorderSize = 1
BorderStyle = tfDefault
CellPadding = 0
CellSpacing = 0
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
FrameBuffer = 40
Lines = tlAll
UseFrame = True
UseWidth = True
Columns = <>
DataSource = OraDataSource1
FooterRowCount = 0
FromStart = True
HighlightColor = clMoneyGreen
HighlightRows = False
Options = [dgShowTitles]
RefreshMode = rmAutomatic
RowLimit = 0
RollOver = False
RowClick = False
RollOverColor = clNone
RowHeaderColor = 12876667
RowAlternateColor = clNone
RowCurrentColor = clNone
end
object IWButton1: TIWButton
Left = 320
Top = 230
Width = 116
Height = 24
ZIndex = 0
ButtonType = btButton
Caption = 'Execute SQL'
Color = clBtnFace
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
TabOrder = 4
OnClick = IWButton1Click
end
object IWButton2: TIWButton
Left = 136
Top = 212
Width = 146
Height = 24
ZIndex = 1
ButtonType = btButton
Caption = 'Test connection'
Color = clBtnFace
DoSubmitValidation = True
Font.Color = clNone
Font.Enabled = True
Font.Size = 10
Font.Style = []
ScriptEvents = <>
TabOrder = 5
OnClick = IWButton2Click
end
object IWLabel1: TIWLabel
Left = 32
Top = 94
Width = 81
Height = 16
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Username'
end
object IWLabel2: TIWLabel
Left = 32
Top = 134
Width = 77
Height = 16
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Password'
end
object IWLabel3: TIWLabel
Left = 32
Top = 174
Width = 52
Height = 16
ZIndex = 0
Font.Color = clNone
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Server'
end
object IWLabel4: TIWLabel
Left = 20
Top = 21
Width = 359
Height = 18
ZIndex = 0
Font.Color = clHighlight
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 12
Font.Style = [fsBold]
Caption = 'Oracle Data Access Demo - IntraWeb'
end
object IWLabel5: TIWLabel
Left = 320
Top = 71
Width = 31
Height = 16
ZIndex = 0
Font.Color = clHighlight
Font.Enabled = True
Font.Size = 11
Font.Style = [fsBold]
Caption = 'SQL'
end
object lblStateConnection: TIWLabel
Left = 32
Top = 216
Width = 151
Height = 16
Visible = False
ZIndex = 0
Font.Color = clHighlight
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'lblStateConnection'
end
object lblResult: TIWLabel
Left = 12
Top = 276
Width = 49
Height = 16
Visible = False
ZIndex = 0
Font.Color = clHighlight
Font.Enabled = True
Font.FontName = 'Verdana'
Font.Size = 10
Font.Style = [fsBold]
Caption = 'Result'
end
object OraSession1: TOraSession
ConnectPrompt = False
AfterConnect = OraSession1AfterConnect
Left = 456
Top = 52
end
object OraDataSource1: TDataSource
DataSet = OraQuery1
Left = 520
Top = 52
end
object OraQuery1: TSmartQuery
CheckMode = cmNone
Session = OraSession1
LockMode = lmNone
Left = 488
Top = 52
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -