object ClientEventsHomePage: TClientEventsHomePage OldCreateOrder = True ComponentPersistent.DefaultMode = pmSave ComponentPersistent.ExceptedComponents = <> DesignerID = 2 EncodingType = wetApplication LeftPos = 0 PositioningType = cxptFlow ServerScript = JScript TopPos = 0 OnActivate = cxWebPageModuleActivate OnDeactivate = cxWebPageModuleDeactivate Left = 50 Top = 50 Height = 767 HorizontalOffset = 222 VerticalOffset = 118 Width = 1011 object scCommon: TcxWebStyleController Left = 144 Top = 16 object stHeader1: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsNone Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 0 Style.Font.Color = clWebPurple Style.Font.Name = 'Times New Roman' Style.Font.Names.Strings = ( 'Times New Roman') Style.Font.Size.Value = 22 Style.Font.Weight = wfwBold end object stHeader2: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsNone Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 0 Style.Font.Decoration = [wfdUnderline] Style.Font.Name = 'Tahoma' Style.Font.Names.Strings = ( 'Tahoma') Style.Font.Size.Value = 11 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwBold end object stPanel: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor] Style.Borders.Style = wbsNone Style.Borders.Right.AssignedValues = [wbavColor] Style.Borders.Top.AssignedValues = [wbavColor] Style.Borders.Width = thin Style.Font.Color = clWebNavy Style.Font.Name = 'MS Sans Serif' Style.Font.Names.Strings = ( 'MS Sans Serif') Style.Font.Size.Value = 12 Style.Font.Weight = wfwBold end object stButtonDef: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlue Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Color = clWebAliceBlue Style.Font.Name = 'MS Sans Serif' Style.Font.Names.Strings = ( 'MS Sans Serif') Style.Font.Size.Value = 8 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal Style.Shading.Color = clWebCornflowerBlue Style.Shading.AssignedValues = [wsavColor] end object stButtonHover: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebDarkBlue Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Color = clWebAliceBlue Style.Font.Name = 'MS Sans Serif' Style.Font.Names.Strings = ( 'MS Sans Serif') Style.Font.Size.Value = 8 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwBold Style.Shading.Color = clWebCornflowerBlue Style.Shading.AssignedValues = [wsavColor] end object stEditorDef: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebGainsboro Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Name = 'MS Sans Serif' Style.Font.Names.Strings = ( 'MS Sans Serif') Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal Style.Shading.Color = clWebWhite Style.Shading.AssignedValues = [wsavColor] end object stEditorHover: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebDarkBlue Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Name = 'MS Sans Serif' Style.Font.Names.Strings = ( 'MS Sans Serif') Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal Style.Shading.Color = clWebWhite Style.Shading.AssignedValues = [wsavColor] end object stLabelDef: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsNone Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 0 Style.Font.Color = clWebNavy Style.Font.Name = 'Tahoma' Style.Font.Names.Strings = ( 'Tahoma') Style.Font.Size.Value = 9 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal end object stLabelHover: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsNone Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 0 Style.Font.Color = clWebCrimson Style.Font.Name = 'Tahoma' Style.Font.Names.Strings = ( 'Tahoma') Style.Font.Size.Value = 9 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwBold end object stTips: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebSandyBrown Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Name = 'Tahoma' Style.Font.Names.Strings = ( 'Tahoma') Style.Font.Size.Value = 8 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal Style.Shading.Color = 14811135 Style.Shading.AssignedValues = [wsavColor] end object stLine1: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebBlack Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = thin Style.Font.Name = 'Times New Roman' Style.Font.Names.Strings = ( 'Times New Roman') Style.Font.Size.Value = 12 Style.Shading.Color = clWebDarkSlateBlue Style.Shading.AssignedValues = [wsavColor] end object stLine2: TcxWebStyleItem Style.Borders.Bottom.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Color = clWebSandyBrown Style.Borders.Left.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Style = wbsSolid Style.Borders.Right.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Top.AssignedValues = [wbavColor, wbavStyle, wbavWidth] Style.Borders.Width = 1 Style.Font.Name = 'Tahoma' Style.Font.Names.Strings = ( 'Tahoma') Style.Font.Size.Value = 8 Style.Font.Style = wfsNormal Style.Font.Transform = wftNone Style.Font.Variant = wfvNormal Style.Font.Weight = wfwNormal Style.Shading.Color = 14811135 Style.Shading.AssignedValues = [wsavColor] end end object cxWebLabel1: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 72 Top = 48 Height = 18 Width = 81 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'Simple control' end object cxWebButton1: TcxWebButton CustomEvents = < item EventProcType = etProcedure EventType = 2 HandlerText.Strings = ( 'var Info = '#39'Event type:\t HTML OnClick\n'#39' + ' ' '#39'event:\t\t HTML event object'#39';' 'alert(Info);') end> Left = 0 Top = 0 Height = 39 Width = 125 ZIndex = 0 TabOrder = 1 Caption = 'Click me' GlyphPosition = gpBeforeText end object cxWebLabel2: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 76 Top = 173 Height = 18 Width = 106 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebDataNavigator' end object cxWebDBDataNavigator1: TcxWebDBDataNavigator CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataNavigator OnButtonClick\n'#39' + ' ' '#39'Sender:\t\tDataNavigator script object\n'#39' + ' ' '#39'Button:\t\t'#39' + Button + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataNavigator OnChangePageSize\n'#39' + ' ' '#39'Sender:\t\tDataNavigator script object\n'#39' + ' ' '#39'PageSize:\t'#39' + PageSize + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '') end> Left = 241 Top = 74 Height = 26 Width = 390 ZIndex = 0 Buttons = < item ButtonType = nbFirst Hint = 'First record' end item ButtonType = nbPrevPage Hint = 'Prior page' end item ButtonType = nbPrev Hint = 'Prior record' end item ButtonType = nbPageSize Hint = 'Page size' end item ButtonType = nbApplyPageSize Hint = 'Apply page size' end item ButtonType = nbNext Hint = 'Next record' end item ButtonType = nbNextPage Hint = 'Next page' end item ButtonType = nbLast Hint = 'Last record' end item ButtonType = nbInsert Hint = 'Insert record' end item ButtonType = nbEdit Hint = 'Edit record' end item ButtonType = nbDelete Hint = 'Delete record' end item ButtonType = nbPost Hint = 'Post changes' end item ButtonType = nbCancel Hint = 'Cancel changes' end item ButtonType = nbRefresh Hint = 'Refresh' end> PageSize = 5 DataBinding.DataSource = cxWebDBDataSource1 end object cxWebLabel3: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 57 Top = 147 Height = 18 Width = 66 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebDBGrid' end object cxWebDBGrid1: TcxWebDBGrid CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnRowClick\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'RowIndex\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'IsGroupedRow\t'#39' + IsGroupedRow + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnHeaderClick\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'ColumnIndex\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 2 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnStartDragHeader\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'ColumnIndex\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 3 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnEndDragHeader\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'ColumnIndex\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '' '') end item EventProcType = etProcedure EventType = 4 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnIndicatorClick\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'Reason\t\t'#39' + Reason + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '' '') end item EventProcType = etProcedure EventType = 5 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebGrid OnExpandButtonClick\n'#39' + ' ' '#39'Sender:\t\tWebGrid script object\n'#39' + ' ' '#39'RowIndex\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '' '') end> Left = 0 Top = 0 Height = 198 Width = 776 ZIndex = 0 BorderWidth = 1 BorderColor = clWebBlack IndicatorWidth = 18 KeepPageSize = False PageSize = 4 ReadOnly = False RowHeight = 26 SelectedColor = clWebHighlight SelectedFontColor = clWebCaptionText ShowGroupedColumns = True DataBinding.DataSource = cxWebDBDataSource1 FirstVisibleRow = 0 object cxWebDBGrid1Column1: TcxWebDBColumn CheckedValue = 'True' ShowCellHint = False ShowHeaderHint = False Title = 'Name' VAlignment = wvalCenter UncheckedValue = 'False' UndefinedValuesState = uvsUnchecked Width = 151 DataBinding.FieldName = 'Name' end object cxWebDBGrid1Column2: TcxWebDBColumn CheckedValue = 'True' ShowCellHint = False ShowHeaderHint = False Title = 'Capital' VAlignment = wvalCenter UncheckedValue = 'False' UndefinedValuesState = uvsUnchecked Width = 151 DataBinding.FieldName = 'Capital' end object cxWebDBGrid1Column3: TcxWebDBColumn CheckedValue = 'True' ShowCellHint = False ShowHeaderHint = False Title = 'Continent' VAlignment = wvalCenter UncheckedValue = 'False' UndefinedValuesState = uvsUnchecked Width = 151 DataBinding.FieldName = 'Continent' end object cxWebDBGrid1Column4: TcxWebDBColumn CheckedValue = 'True' ShowCellHint = False ShowHeaderHint = False Title = 'Area' VAlignment = wvalCenter UncheckedValue = 'False' UndefinedValuesState = uvsUnchecked Width = 150 DataBinding.FieldName = 'Area' end object cxWebDBGrid1Column5: TcxWebDBColumn CheckedValue = 'True' ShowCellHint = False ShowHeaderHint = False Title = 'Population' VAlignment = wvalCenter UncheckedValue = 'False' UndefinedValuesState = uvsUnchecked Width = 153 DataBinding.FieldName = 'Population' end end object cxWebDBDataSource1: TcxWebDBDataSource CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnAfterSort\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnAfterGroup\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'GroupIndex:\t'#39' + GroupIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 2 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnAfterUnGroup\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 3 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnAfterExpand\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 4 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnAfterMove\n'#39'+ ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 5 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeSort\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow sorting, Boolean'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 6 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeGroup\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'GroupIndex:\t'#39' + GroupIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow grouping, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 7 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeUnGroup\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'ColumnIndex:\t'#39' + ColumnIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow ungrouping, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 8 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeExpand\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow expanding, Boolean'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 9 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeMove\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow moving, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 10 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeDelete\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow deleting, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 11 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeInsert\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow inserting, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 12 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeStartEdit\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'RowIndex:\t'#39' + RowIndex + '#39'\n'#39' + ' ' '#39'Return value:\tAllow start edit, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 13 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforePostEdit\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'Return value:\tAllow post edit, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 14 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeCancelEdit\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'Return value:\tAllow cancel edit, Boolean'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 15 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDataSource OnBeforeRefresh\n'#39' + ' ' '#39'Sender:\t\tDataController script object\n'#39' + ' ' '#39'Return value:\tAllow refresh, Boolean'#39';' 'alert(Info);' '') end> KeyFieldName = 'Name' DataSet = ADOTable1 Left = 248 Top = 16 end object ADOTable1: TADOTable ConnectionString = 'FILE NAME=C:\Program Files\Common Files\System\OLE DB\Data Links' + '\DBDEMOS.udl' CursorType = ctStatic TableName = 'country' Left = 376 Top = 16 end object cxWebLabel4: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 56 Top = 374 Height = 18 Width = 76 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebCalendar' end object cxWebCalendar1: TcxWebCalendar CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebCalendar OnSelectDay\n'#39' + ' ' '#39'Sender:\t\tCalendar script object\n'#39' + ' ' '#39'ADate\t\t'#39' + ADate + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow select date'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebCalendar OnShiftMonth\n'#39' + ' ' '#39'Sender:\t\tCalendar script object\n'#39' + ' ' '#39'Offset\t\t'#39' + Offset + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow shift month'#39';' 'alert(Info);' '') end> Left = 245 Top = 377 Height = 160 Width = 200 ZIndex = 0 CellPadding = 0 CellSpacing = 0 DayHeaderAlignment = whalLeft FirstDayOfWeek = dowLocaleDefault NextMonthText = 'Next' PrevMonthText = 'Prev' ShowYear = True ShowMonthPictures = False ShowTodayLink = True SelectedDate = 37396.5208065857 end object cxWebLabel5: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 61 Top = 502 Height = 18 Width = 77 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebDateEdit' end object cxWebDateEdit1: TcxWebDateEdit CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDateEdit OnSelectDay\n'#39' + ' ' '#39'Sender:\t\tDateEdit script object\n'#39' + ' ' '#39'ADate\t\t'#39' + ADate + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow select date'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDateEdit OnShiftMonth\n'#39' + ' ' '#39'Sender:\t\tDateEdit script object\n'#39' + ' ' '#39'Offset\t\t'#39' + Offset + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow shift month'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 2 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebDateEdit OnValidateEditText\n'#39' + ' ' '#39'Sender:\t\tDateEdit script object\n'#39' + ' ' '#39'AText\t\t'#39' + AText + '#39'\n'#39' + ' ' '#39'Return value:\tString, Valid date'#39';' 'alert(Info);' '') end> Left = 194 Top = 539 Height = 22 Width = 200 ZIndex = 0 CellPadding = 0 CellSpacing = 0 DayHeaderAlignment = whalLeft FirstDayOfWeek = dowLocaleDefault NextMonthText = 'Next' PrevMonthText = 'Prev' ShowYear = True ShowMonthPictures = False ShowTodayLink = False ButtonImageIndex = 0 ButtonWidth = 18 TabOrder = 0 SelectedDate = 37396.5215680208 end object cxWebLabel6: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 63 Top = 530 Height = 18 Width = 61 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebTimer' end object cxWebTimer1: TcxWebTimer CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebTimer OnTimer\n'#39' + ' ' '#39'Sender:\t\tTimer script object\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);') end> Enabled = False Interval = 5000 Left = 472 Top = 16 end object cbTimerEnable: TcxWebCheckBox CustomEvents = <> StyleItem_Default = stLabelDef Left = 231 Top = 500 Height = 23 Width = 76 ZIndex = 0 Styles.Default = stLabelDef TabOrder = 2 Caption = 'Enabled' OnClick = cbTimerEnableClick end object cxWebLabel7: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 81 Top = 498 Height = 18 Width = 98 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebDataSources' end object cbLAL: TcxWebCheckBox CustomEvents = <> StyleItem_Default = stLabelDef Left = 97 Top = 541 Height = 23 Width = 160 ZIndex = 0 Styles.Default = stLabelDef TabOrder = 3 Caption = 'Load all records mode' OnClick = cbLALClick end object cxWebLabel8: TcxWebLabel CustomEvents = <> StyleItem_Default = stLabelDef Left = 534 Top = 815 Height = 18 Width = 83 ZIndex = 0 Styles.Default = stLabelDef WordWrap = False Caption = 'WebTreeView' end object cxWebTreeView1: TcxWebTreeView CustomEvents = < item EventProcType = etProcedure EventType = 0 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebTreeView OnTreeItemClick\n'#39' + ' ' '#39'Sender:\t\tWebTreeView script object\n'#39' + ' ' '#39'ItemName\t'#39' + ItemName + '#39'\n'#39' + ' ' '#39'Return value:\tHas no value'#39';' 'alert(Info);' '') end item EventProcType = etProcedure EventType = 1 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebTreeView OnTreeItemCollapse\n'#39' + ' ' '#39'Sender:\t\tWebTreeView script object\n'#39' + ' ' '#39'ItemName\t'#39' + ItemName + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow collapse node'#39';' 'alert(Info);') end item EventProcType = etProcedure EventType = 2 HandlerText.Strings = ( 'var Info = '#39'Event type:\tWebTreeView OnTreeItemExpand\n'#39' + ' ' '#39'Sender:\t\tWebTreeView script object\n'#39' + ' ' '#39'ItemName\t'#39' + ItemName + '#39'\n'#39' + ' ' '#39'Return value:\tBoolean, Allow expand node'#39';' 'alert(Info);') end> Left = 344 Top = 463 Height = 165 Width = 198 ZIndex = 0 Items = { 0D000000030000000000000001FFFFFFFF000000000000000000000000000000 00000000000D000000020000000000000001FFFFFFFF00000000060000004974 656D5F310000000000000000000000000D000000000000000000000000FFFFFF FF00000000080000004974656D5F315F310000000000000000000000000D0000 00000000000000000000FFFFFFFF00000000080000004974656D5F315F320000 000000000000000000000D000000020000000000000001FFFFFFFF0000000006 0000004974656D5F320000000000000000000000000D00000000000000000000 0000FFFFFFFF00000000080000004974656D5F325F3100000000000000000000 00000D000000010000000000000001FFFFFFFF00000000080000004974656D5F 325F320000000000000000000000000D000000000000000000000000FFFFFFFF 000000000A0000004974656D5F325F325F310000000000000000000000000D00 0000000000000000000000FFFFFFFF00000000060000004974656D5F33000000 000000000000000000} end end