Unit2.dfm

<< Click to Display Table of Contents >>

Navigation:  Demos > XI > HiddenFields >

Unit2.dfm

object IWForm2: TIWForm2

 Left = 0

 Top = 0

 Width = 555

 Height = 400

 RenderInvisibleControls = False

 AllowPageAccess = True

 ConnectionMode = cmAny

 HiddenFields.Strings = (

 'MyHiddenField=ABCD')

 SupportedBrowsers = []

 Background.Fixed = False

 HandleTabs = False

 LeftToRight = True

 LockUntilLoaded = True

 LockOnSubmit = True

 ShowHint = True

 XPTheme = True

 DesignLeft = 339

 DesignTop = 163

 object IWButton1: TIWButton

 Left = 56

 Top = 40

 Width = 201

 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 = 'Change Hidden Field Value'

 DoSubmitValidation = True

 Color = clBtnFace

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 FriendlyName = 'IWButton1'

 ScriptEvents = <

 item

 EventCode.Strings = (

 'el = document.getElementById("HIDDEN_MyHiddenField");'

 'if (el) {'

 ' el.value = el.value + " 1";'

 '}')

 Event = 'onClick'

 end>

 TabOrder = 0

 end

 object IWButton2: TIWButton

 Left = 56

 Top = 88

 Width = 201

 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 = 'Submit and Retrieve'

 DoSubmitValidation = True

 Color = clBtnFace

 Font.Color = clNone

 Font.Size = 10

 Font.Style = []

 FriendlyName = 'IWButton2'

 ScriptEvents = <>

 TabOrder = 1

 OnClick = IWButton2Click

 end

end