object StylesMultiDemoMainForm: TStylesMultiDemoMainForm Left = 270 Top = 120 Width = 807 Height = 566 Caption = 'ExpressQuantumGrid StylesMulti Demo' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = mmMain OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object lbDescrip: TLabel Left = 0 Top = 0 Width = 799 Height = 18 Align = alTop AutoSize = False Caption = 'Practice using Style Sheets. Click '#39'About this demo'#39' for more in' + 'formation.' Color = 12937777 Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False WordWrap = True end object Splitter: TSplitter Left = 177 Top = 18 Width = 2 Height = 475 MinSize = 4 end object sbMain: TStatusBar Left = 0 Top = 493 Width = 799 Height = 19 AutoHint = True Panels = <> ParentShowHint = False ShowHint = True SimplePanel = True end object cxGrid: TcxGrid Left = 179 Top = 18 Width = 620 Height = 475 Align = alClient TabOrder = 2 object tvProjects: TcxGridDBTableView DataController.DataSource = StylesMultiDemoMainDM.dsProjects DataController.KeyFieldNames = 'ID' DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount Column = tvProjectsNAME end> DataController.Summary.SummaryGroups = <> NavigatorButtons.ConfirmDelete = False OptionsView.ColumnAutoWidth = True OptionsView.Footer = True OptionsView.Indicator = True object tvProjectsID: TcxGridDBColumn DataBinding.FieldName = 'ID' Visible = False end object tvProjectsNAME: TcxGridDBColumn DataBinding.FieldName = 'NAME' Width = 200 end object tvProjectsMANAGERID: TcxGridDBColumn DataBinding.FieldName = 'MANAGERID' RepositoryItem = StylesMultiDemoMainDM.edrepUserInfo Width = 200 end end object tvTeam: TcxGridDBTableView DataController.DataSource = StylesMultiDemoMainDM.dsTeam DataController.DetailKeyFieldNames = 'PROJECTID' DataController.KeyFieldNames = 'ID' DataController.MasterKeyFieldNames = 'ID' DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount Column = tvTeamFUNCTION end> DataController.Summary.SummaryGroups = <> NavigatorButtons.ConfirmDelete = False OptionsView.ColumnAutoWidth = True OptionsView.Footer = True OptionsView.Indicator = True object tvTeamPROJECTID: TcxGridDBColumn DataBinding.FieldName = 'PROJECTID' Visible = False end object tvTeamFUNCTION: TcxGridDBColumn DataBinding.FieldName = 'FUNCTION' Width = 150 end object tvTeamUSERID: TcxGridDBColumn DataBinding.FieldName = 'USERID' RepositoryItem = StylesMultiDemoMainDM.edrepUserInfo Width = 200 end end object lvProjects: TcxGridLevel GridView = tvProjects object lvTeam: TcxGridLevel GridView = tvTeam end end end object pnlLeft: TPanel Left = 0 Top = 18 Width = 177 Height = 475 Align = alLeft Anchors = [akLeft] BevelInner = bvLowered BevelOuter = bvNone Color = 15451300 TabOrder = 1 object gbUserDefined: TcxGroupBox Left = 1 Top = 318 Width = 175 Height = 156 TabStop = True Align = alBottom Caption = 'User Defined Style Sheets' Enabled = False TabOrder = 3 object cbUserStyleSheets: TComboBox Left = 10 Top = 31 Width = 154 Height = 19 Style = csOwnerDrawFixed Anchors = [akLeft, akTop, akRight] Color = 16247513 Enabled = False ItemHeight = 13 TabOrder = 0 OnClick = cbUserStyleSheetsChange end object btnLoad: TcxButton Left = 11 Top = 89 Width = 153 Height = 25 Anchors = [akLeft, akTop, akRight] Caption = '&LoadFromFile...' Enabled = False TabOrder = 2 OnClick = btnLoadClick end object btnSave: TcxButton Left = 11 Top = 116 Width = 153 Height = 25 Anchors = [akLeft, akTop, akRight] Caption = '&SaveToFile...' Enabled = False TabOrder = 3 OnClick = btnSaveClick end object btnEdit: TcxButton Left = 11 Top = 62 Width = 153 Height = 25 Anchors = [akLeft, akTop, akRight] Caption = '&Edit Style Sheet' Enabled = False TabOrder = 1 OnClick = btnEditClick end end object RadioGroup: TcxRadioGroup Left = 1 Top = 36 Width = 175 Height = 88 Align = alTop Caption = 'Use styles' ItemIndex = 1 Properties.Items = < item Caption = 'None' end item Caption = 'Predefined' end item Caption = 'User defined' end> TabOrder = 1 OnClick = RadioGroupClick end object gbPredefined: TcxGroupBox Left = 1 Top = 124 Width = 175 Height = 194 TabStop = True Align = alClient Caption = 'Predefined Style Sheets' TabOrder = 2 object lbPredefinedStyleSheets: TcxListBox Left = 2 Top = 16 Width = 171 Height = 176 Align = alClient ItemHeight = 13 Style.Color = 16247513 TabOrder = 0 OnClick = lbPredefinedStyleSheetsClick end end object pnlCurrentStyleSheet: TPanel Left = 1 Top = 1 Width = 175 Height = 35 Align = alTop BevelOuter = bvLowered Color = 4707838 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end end object mmMain: TMainMenu Left = 504 Top = 8 object miFile: TMenuItem Caption = '&File' object miExit: TMenuItem Caption = 'E&xit' Hint = 'Press to quit the demo-program' ShortCut = 32856 OnClick = miExitClick end end object miOptions: TMenuItem Caption = 'Options' object miLookFeel: TMenuItem Caption = '&Look&&Feel' object miKind: TMenuItem Caption = 'Kind' object miFlat: TMenuItem Caption = '&Flat' Hint = 'Setting this option changes the grid view appearance to Flat sty' + 'le' RadioItem = True OnClick = miLookAndFeelKindClick end object miStandard: TMenuItem Caption = '&Standard' Hint = 'Setting this option changes the grid view appearance to Standard' + ' style' RadioItem = True OnClick = miLookAndFeelKindClick end object miUltraFlat: TMenuItem Caption = '&Ultra Flat' Checked = True Hint = 'Setting this option changes the grid view appearance to Ultra Fl' + 'at style' RadioItem = True OnClick = miLookAndFeelKindClick end object miOffice11: TMenuItem Tag = 3 Caption = '&Office11' Hint = 'Setting this option changes the grid view appearance to Office11' + ' style' RadioItem = True OnClick = miLookAndFeelKindClick end end object miNativeStyle: TMenuItem Caption = '&Native Style' Checked = True Hint = 'Setting this option changes the appearance of grid items to the ' + 'native style' OnClick = miNativeStyleClick end end end object miAbout: TMenuItem Caption = '&About this demo' Hint = 'Displays the brief description of the current demo features' OnClick = miAboutClick end end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid PopupMenus = <> Left = 440 Top = 8 end object OpenDialog: TOpenDialog DefaultExt = '*.ini' Filter = '*.ini|*.ini' FilterIndex = 0 Options = [ofHideReadOnly, ofExtensionDifferent, ofEnableSizing] Left = 536 Top = 8 end object SaveDialog: TSaveDialog DefaultExt = '*.ini' Filter = '*.ini|*.ini' Left = 568 Top = 8 end object LookAndFeelController: TcxLookAndFeelController NativeStyle = True Left = 472 Top = 8 end end