editorslookupdemomain.dfm

DevExpress ExpressQuantumGrid Suite v5.9 Full Source

object EditorsLookupDemoMainForm: TEditorsLookupDemoMainForm
  Left = 269
  Top = 185
  AutoSize = True
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'ExpressQuantumGrid EditorsLookupDemo '
  ClientHeight = 340
  ClientWidth = 546
  Color = 15451300
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = mmMain
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object lbDescription: TLabel
    Left = 0
    Top = 0
    Width = 546
    Height = 48
    Align = alTop
    Caption = 
      'Practice using lookup data-aware editors for reading and writing' +
      '.'#10#13'See also the Storage menu to provide runtime store/restore de' +
      'mo settings.'#10#13'Click "About this demo" for more information.'
    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 sbMain: TStatusBar
    Left = 0
    Top = 321
    Width = 546
    Height = 19
    AutoHint = True
    Align = alTop
    Panels = <>
    ParentShowHint = False
    ShowHint = True
    SimplePanel = True
  end
  object pnlEditors: TPanel
    Left = 0
    Top = 48
    Width = 546
    Height = 273
    Align = alTop
    BevelOuter = bvNone
    ParentColor = True
    TabOrder = 1
    object gbIssue: TGroupBox
      Left = 8
      Top = 56
      Width = 329
      Height = 177
      Caption = 'Issue'
      TabOrder = 1
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 31
        Height = 13
        Caption = 'Name:'
      end
      object Label2: TLabel
        Left = 8
        Top = 58
        Width = 56
        Height = 13
        Caption = 'Description:'
      end
      object Label9: TLabel
        Left = 8
        Top = 38
        Width = 65
        Height = 13
        Caption = 'Issue Creator:'
      end
      object edName: TcxDBTextEdit
        Left = 80
        Top = 10
        Width = 241
        Height = 21
        DataBinding.DataField = 'NAME'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 0
      end
      object meDescription: TcxDBMemo
        Left = 8
        Top = 73
        Width = 313
        Height = 97
        DataBinding.DataField = 'DESCRIPTION'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.ScrollBars = ssVertical
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 2
      end
      object lcbCreator: TcxDBLookupComboBox
        Left = 80
        Top = 33
        Width = 241
        Height = 21
        DataBinding.DataField = 'CREATORID'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.DropDownListStyle = lsEditList
        Properties.ImmediateDropDown = 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.Color = 16247513
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 1
      end
    end
    object gbInfo: TGroupBox
      Left = 344
      Top = 64
      Width = 193
      Height = 81
      Caption = 'Info'
      TabOrder = 2
      object Label3: TLabel
        Left = 8
        Top = 16
        Width = 34
        Height = 13
        Caption = 'Priority:'
      end
      object Label4: TLabel
        Left = 8
        Top = 39
        Width = 40
        Height = 13
        Caption = 'Created:'
      end
      object cbPriority: TcxDBImageComboBox
        Left = 64
        Top = 10
        Width = 121
        Height = 21
        DataBinding.DataField = 'PRIORITY'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.Images = EditorsLookupDemoDataDM.imStat
        Properties.Items = <
          item
            Description = 'Low'
            ImageIndex = 0
            Value = 1
          end
          item
            Description = 'Normal'
            Value = 2
          end
          item
            Description = 'High'
            ImageIndex = 1
            Value = 3
          end>
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 0
      end
      object deCreateDate: TcxDBDateEdit
        Left = 64
        Top = 33
        Width = 121
        Height = 21
        DataBinding.DataField = 'CREATEDDATE'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 1
      end
      object chbRequest: TcxDBCheckBox
        Left = 8
        Top = 56
        Width = 121
        Height = 21
        Caption = 'Request'
        DataBinding.DataField = 'TYPE'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        TabOrder = 2
      end
    end
    object gbStatus: TGroupBox
      Left = 344
      Top = 144
      Width = 193
      Height = 89
      Caption = 'Status'
      TabOrder = 3
      object Label5: TLabel
        Left = 8
        Top = 20
        Width = 33
        Height = 13
        Caption = 'Status:'
      end
      object Label6: TLabel
        Left = 8
        Top = 43
        Width = 43
        Height = 13
        Caption = 'Modified:'
      end
      object Label7: TLabel
        Left = 8
        Top = 67
        Width = 28
        Height = 13
        Caption = 'Fixed:'
      end
      object cbStatus: TcxDBImageComboBox
        Left = 64
        Top = 14
        Width = 121
        Height = 21
        DataBinding.DataField = 'STATUS'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Properties.Images = EditorsLookupDemoDataDM.imStat
        Properties.Items = <
          item
            Description = 'New'
            ImageIndex = 4
            Value = 1
          end
          item
            Description = 'Postponed'
            ImageIndex = 5
            Value = 2
          end
          item
            Description = 'Fixed'
            ImageIndex = 6
            Value = 3
          end
          item
            Description = 'Rejected'
            ImageIndex = 7
            Value = 4
          end>
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 0
      end
      object deLastModifiedDate: TcxDBDateEdit
        Left = 64
        Top = 38
        Width = 121
        Height = 21
        DataBinding.DataField = 'LASTMODIFIEDDATE'
        DataBinding.DataSource = EditorsLookupDemoDataDM.dsItems
        Style.StyleController = EditorsLookupDemoDataDM.StyleController
        TabOrder = 1
      end
      object deFixedDate: TcxDBDateEdit
        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 = 285
      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 = 22
        Width = 36
        Height = 13
        Caption = 'Project:'
      end
      object Label10: TLabel
        Left = 268
        Top = 22
        Width = 62
        Height = 13
        Caption = 'Issue Owner:'
      end
      object lcbProject: TcxDBLookupComboBox
        Left = 44
        Top = 16
        Width = 217