|
<< Click to Display Table of Contents >> Navigation: Demos > XI > Features > RegionForm.dfm |
object formRegion: TformRegion
Left = 0
Top = 0
Width = 555
Height = 518
RenderInvisibleControls = False
ConnectionMode = cmAny
Title = 'Regions Demonstration'
SupportedBrowsers = [brNetscape7, brIE, brOpera, brNetscape6]
AllowPageAccess = True
BrowserSecurityCheck = True
Background.Fixed = False
HandleTabs = False
LeftToRight = True
LockUntilLoaded = True
LockOnSubmit = True
ShowHint = True
XPTheme = True
DesignLeft = 8
DesignTop = 8
object IWText1: TIWText
Left = 8
Top = 40
Width = 529
Height = 85
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
BGColor = clNone
ConvertSpaces = True
Font.Color = clNone
Font.Size = 10
Font.Style = []
FriendlyName = 'IWText1'
Lines.Strings = (
'Regions have been greatly improved.'
'New features include:'
' - Scrollbars at runtime'
' - Nested Regions!')
RawText = False
UseFrame = False
WantReturns = True
end
object IWCheckBox2: TIWCheckBox
Left = 264
Top = 112
Width = 169
Height = 21
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
Caption = 'Toggle Outer Region'
Editable = True
Font.Color = clNone
Font.Size = 10
Font.Style = []
SubmitOnAsyncEvent = True
ScriptEvents = <>
DoSubmitValidation = True
Style = stNormal
TabOrder = 3
OnClick = IWCheckBox2Click
Checked = True
FriendlyName = 'IWCheckBox2'
end
object IWRegion1: TIWRegion
Left = 8
Top = 133
Width = 233
Height = 184
Cursor = crAuto
HorzScrollBar.ButtonSize = 4
HorzScrollBar.Margin = 4
HorzScrollBar.Size = 4
HorzScrollBar.ThumbSize = 4
VertScrollBar.ButtonSize = 4
VertScrollBar.Margin = 4
VertScrollBar.Size = 4
VertScrollBar.ThumbSize = 4
RenderInvisibleControls = False
TabOrder = 0
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsSolid
BorderOptions.Color = clNone
Color = clWebNAVY
ParentShowHint = False
ShowHint = True
ZIndex = -1
Splitter = False
object IWButton1: TIWButton
Left = 12
Top = 16
Width = 149
Height = 25
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
Caption = 'Toggle Scrollbars'
DoSubmitValidation = True
Color = clBtnFace
Font.Color = clNone
Font.Size = 10
Font.Style = []
FriendlyName = 'IWButton1'
ScriptEvents = <>
TabOrder = 2
OnClick = IWButton1Click
end
object IWMemo1: TIWMemo
Left = 16
Top = 68
Width = 249
Height = 189
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
BGColor = clWebWHITE
Editable = True
Font.Color = clNone
Font.Size = 10
Font.Style = []
ScriptEvents = <>
InvisibleBorder = False
HorizScrollBar = False
VertScrollBar = True
Required = False
TabOrder = 0
SubmitOnAsyncEvent = True
FriendlyName = 'IWMemo1'
Lines.Strings = (
'This is a TIWMemo inside a Region. '
'Press the button to toggle the '
'scrollbars on the region so that '
'all the memo is visible.')
end
end
object IWRegion2: TIWRegion
Left = 264
Top = 140
Width = 245
Height = 257
Cursor = crAuto
RenderInvisibleControls = False
TabOrder = 1
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsSolid
BorderOptions.Color = clNone
Color = clWebOLIVE
ParentShowHint = False
ShowHint = True
ZIndex = -1
Splitter = False
object IWCheckBox1: TIWCheckBox
Left = 12
Top = 176
Width = 161
Height = 21
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
Caption = 'Toggle Inner Region'
Editable = True
Font.Color = clNone
Font.Size = 10
Font.Style = []
SubmitOnAsyncEvent = True
ScriptEvents = <>
DoSubmitValidation = True
Style = stNormal
TabOrder = 1
OnClick = IWCheckBox1Click
Checked = True
FriendlyName = 'IWCheckBox1'
end
object IWRegion3: TIWRegion
Left = 12
Top = 20
Width = 161
Height = 145
Cursor = crAuto
RenderInvisibleControls = False
TabOrder = 0
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsSolid
BorderOptions.Color = clNone
Color = clWebDEEPSKYBLUE
ParentShowHint = False
ShowHint = True
ZIndex = -1
Splitter = False
object IWLabel1: TIWLabel
Left = 8
Top = 28
Width = 50
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Size = 10
Font.Style = []
NoWrap = False
ConvertSpaces = False
HasTabOrder = False
AutoSize = False
FriendlyName = 'IWLabel1'
Caption = 'A Label'
RawText = False
end
end
end
inline framMenu1: TframMenu
Left = 0
Top = 0
Width = 555
Height = 26
HorzScrollBar.Range = 185
HorzScrollBar.Visible = False
VertScrollBar.Range = 468
VertScrollBar.Visible = False
Align = alTop
AutoScroll = False
Color = clWhite
ParentColor = False
TabOrder = 2
TabStop = True
inherited IWFrameRegion: TIWRegion
Width = 555
TabOrder = 4
inherited IWMenu1: TIWMenu
Width = 555
end
end
end
object IWRegion4: TIWRegion
Left = 0
Top = 440
Width = 555
Height = 78
Cursor = crAuto
RenderInvisibleControls = False
Align = alBottom
BorderOptions.NumericWidth = 1
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsSolid
BorderOptions.Color = clNone
Color = clWebCORAL
ParentShowHint = False
ShowHint = True
ZIndex = 1000
Splitter = True
object IWLabel2: TIWLabel
Left = 8
Top = 8
Width = 374
Height = 16
Cursor = crAuto
IW50Hint = False
ParentShowHint = False
ShowHint = True
ZIndex = 0
RenderSize = True
StyleRenderOptions.RenderSize = True
StyleRenderOptions.RenderPosition = True
StyleRenderOptions.RenderFont = True
StyleRenderOptions.RenderZIndex = True
StyleRenderOptions.RenderVisibility = True
StyleRenderOptions.RenderStatus = True
StyleRenderOptions.RenderAbsolute = True
Alignment = taLeftJustify
BGColor = clNone
Font.Color = clNone
Font.Size = 10
Font.Style = []
NoWrap = False
ConvertSpaces = False
HasTabOrder = False
FriendlyName = 'IWLabel2'
Caption = 'This Region can be resized by dragging the bar at the top'
RawText = False
end
end
end