editorslookupdemomain.dfm

delphi的的三方控件

        Left = 64
        Top = 62
        Width = 121
        Height = 21
        DataBinding.DataField = 'FIXEDDATE'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 2
      end
    end
    object DBNavigator: TcxDBNavigator
      Left = 8
      Top = 240
      Width = 255
      Height = 25
      Buttons.PageSize = 10
      DataSource = EditorsLookupDemoDataDM.dsItems
      TabOrder = 4
    end
    object gbProject: TGroupBox
      Left = 8
      Top = 8
      Width = 529
      Height = 49
      Caption = 'Primary Info'
      TabOrder = 0
      object Label8: TLabel
        Left = 8
        Top = 20
        Width = 36
        Height = 13
        Caption = 'Project:'
      end
      object Label10: TLabel
        Left = 268
        Top = 20
        Width = 62
        Height = 13
        Caption = 'Issue Owner:'
      end
      object lcbProject: TcxDBLookupComboBox
        Left = 44
        Top = 16
        Width = 217
        Height = 21
        DataBinding.DataField = 'PROJECTID'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.DropDownAutoSize = True
        Properties.IncrementalFiltering = False
        Properties.KeyFieldNames = 'ID'
        Properties.ListColumns = <
          item
            Width = 200
            FieldName = 'NAME'
          end
          item
            Caption = 'Manager'
            Width = 100
            FieldName = 'Manager'
          end>
        Properties.ListSource = EditorsLookupDemoDataDM.dsProjects
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 0
      end
      object lcbOwner: TcxDBLookupComboBox
        Left = 332
        Top = 16
        Width = 191
        Height = 21
        DataBinding.DataField = 'OWNERID'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.DropDownListStyle = lsEditList
        Properties.ImmediateDropDown = False
        Properties.IncrementalFiltering = False
        Properties.KeyFieldNames = 'ID'
        Properties.ListColumns = <
          item
            FieldName = 'UserName'
          end>
        Properties.ListOptions.GridLines = glNone
        Properties.ListOptions.ShowHeader = False
        Properties.ListSource = EditorsLookupDemoDataDM.dsUsers
        Properties.MaxLength = 50
        Properties.OnNewLookupDisplayText = lcbCreatorNewLookupDisplayText
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 1
      end
    end
  end
  inherited mmMain: TMainMenu
    inherited miOptions: TMenuItem
      Caption = 'Options'
      object LookupOptions1: TMenuItem [0]
        Caption = 'Lookup &Options'
        object miEditMode: TMenuItem
          Tag = 3
          Caption = '&Edit Mode'
          Checked = True
          GroupIndex = 2
          RadioItem = True
          OnClick = ChangeLookupModeClick
        end
        object miPickMode: TMenuItem
          Tag = 1
          Caption = '&Pick mode'
          GroupIndex = 2
          Hint = 'Pick mode with incremental filtering'
          RadioItem = True
          OnClick = ChangeLookupModeClick
        end
        object miStandardMode: TMenuItem
          Tag = 2
          Caption = '&Standard mode'
          GroupIndex = 2
          Hint = 'Standard lookup mode'
          RadioItem = True
          OnClick = ChangeLookupModeClick
        end
      end
      object N1: TMenuItem [1]
        Caption = '-'
      end
    end
    object miStorage: TMenuItem [2]
      Caption = '&Storage'
      object miStorageActive: TMenuItem
        Caption = 'Save the settings before closing the demo '
        Checked = True
        Hint = 
          'Determines whether the settings are stored before closing the de' +
          'mo'
        OnClick = miStorageActiveClick
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object miStoringGridLookFeel: TMenuItem
        Caption = 'Save the Demo'#39's &Look&&Feel before closing the demo '
        Checked = True
        Hint = 
          'Determines whether the Demo'#39's Look&Feel is stored before closing' +
          ' the demo'
        OnClick = miStoringGridLookFeelClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object miStorageType: TMenuItem
        Caption = 'Storage &Location'
        object miIniStoreType: TMenuItem
          Caption = '&Ini file'
          Checked = True
          Hint = 'Setting this option changes the current storage to an INI file'
          RadioItem = True
          OnClick = StorageTypeClick
        end
        object miRegistryStoreType: TMenuItem
          Tag = 1
          Caption = '&Registry'
          Hint = 'Setting this option changes the current storage to the registry'
          RadioItem = True
          OnClick = StorageTypeClick
        end
        object miMemoryStoreType: TMenuItem
          Tag = 2
          Caption = '&Memory'
          Hint = 'Setting this option changes the current storage to memory'
          RadioItem = True
          OnClick = StorageTypeClick
        end
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object miStore: TMenuItem
        Caption = '&Store'
        Hint = 'Saves the demo settings to the current storage'
        OnClick = miStoreClick
      end
      object miRestore: TMenuItem
        Caption = '&Restore'
        Hint = 'Restores the demo settings from the current storage'
        OnClick = miRestoreClick
      end
    end
  end
  object cxPropertiesStore: TcxPropertiesStore
    Components = <
      item
        Component = actShowDemoDescription
        Properties.Strings = (
          'Checked')
      end
      item
        Component = cxLookAndFeelController
        Properties.Strings = (
          'Kind'
          'Name'
          'NativeStyle'
          'Tag')
      end
      item
        Component = lbDescrip
        Properties.Strings = (
          'Visible')
      end
      item
        Component = lcbCreator
        Properties.Strings = (
          'Properties.DropDownListStyle'
          'Properties.ImmediateDropDown')
      end
      item
        Component = lcbOwner
        Properties.Strings = (
          'Properties.DropDownListStyle'
          'Properties.ImmediateDropDown')
      end
      item
        Component = lcbProject
        Properties.Strings = (
          'Properties.DropDownListStyle')
      end
      item
        Component = miEditMode
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miFlat
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miNativeStyle
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miPickMode
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miStandard
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miStandardMode
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miUltraFlat
        Properties.Strings = (
          'Checked')
      end>
    StorageName = 'cxPropertiesStore.ini'
    Left = 8
    Top = 8
  end
  object cxStorageActiveStore: TcxPropertiesStore
    Components = <
      item
        Component = cxPropertiesStore
        Properties.Strings = (
          'Active'
          'StorageName'
          'StorageType')
      end
      item
        Component = miIniStoreType
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miMemoryStoreType
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miRegistryStoreType
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miStorageActive
        Properties.Strings = (
          'Checked')
      end
      item
        Component = miStoringGridLookFeel
        Properties.Strings = (
          'Checked'
          'Enabled')
      end>
    StorageName = 'cxStorageActiveStore.INI'
    Left = 352
    Top = 8
  end
end