uuserimpower.dfm

制衣管理系统程序+源码,编译通过还不错啊,可以

object frmUserImpower: TfrmUserImpower
  Left = 145
  Top = 130
  BorderStyle = bsDialog
  Caption = #29992#25143#26435#38480#31649#29702
  ClientHeight = 309
  ClientWidth = 437
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 12
  object SpeedButton1: TSpeedButton
    Left = 352
    Top = 13
    Width = 76
    Height = 21
    Caption = #25552#20132#20445#23384
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 352
    Top = 48
    Width = 76
    Height = 21
    Caption = #25918#24323#36820#22238
    OnClick = SpeedButton2Click
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 197
    Height = 105
    Caption = #29992#25143#21517#31216
    TabOrder = 0
    object cxGrid6: TcxGrid
      Left = 10
      Top = 15
      Width = 177
      Height = 81
      TabOrder = 0
      LookAndFeel.Kind = lfStandard
      object GridUser: TcxGridDBTableView
        DataController.DataSource = dsUser
        DataController.Filter.Criteria = {FFFFFFFF0000000000}
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <
          item
            Kind = skCount
            Column = colCode6
          end>
        DataController.Summary.SummaryGroups = <>
        NavigatorButtons.ConfirmDelete = False
        OnFocusedRecordChanged = GridUserFocusedRecordChanged
        OptionsBehavior.FocusFirstCellOnNewRecord = True
        OptionsBehavior.GoToNextCellOnEnter = True
        OptionsBehavior.FocusCellOnCycle = True
        OptionsData.Editing = False
        OptionsView.NavigatorOffset = 40
        OptionsView.ColumnAutoWidth = True
        OptionsView.GridLines = glNone
        OptionsView.GroupByBox = False
        object colCode6: TcxGridDBColumn
          Caption = #20154#21592#32534#21495
          HeaderAlignmentHorz = taCenter
          HeaderAlignmentVert = vaCenter
          HeaderGlyphAlignmentHorz = taCenter
          Options.Filtering = False
          Options.Sorting = False
          Width = 64
          DataBinding.FieldName = 'CCode'
        end
        object colName6: TcxGridDBColumn
          Caption = #20154#21592#22995#21517
          HeaderAlignmentHorz = taCenter
          HeaderAlignmentVert = vaCenter
          HeaderGlyphAlignmentHorz = taCenter
          Options.Filtering = False
          Options.Sorting = False
          Width = 64
          DataBinding.FieldName = 'CName'
        end
      end
      object cxGridLevel5: TcxGridLevel
        GridView = GridUser
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 213
    Top = 8
    Width = 128
    Height = 105
    Caption = #25152#23646#32452#21035
    TabOrder = 1
    object cbAdmin: TcxCheckBox
      Left = 28
      Top = 20
      Width = 76
      Height = 21
      Properties.DisplayUnchecked = 'False'
      Properties.Caption = #31649#29702#32773
      TabOrder = 0
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      OnClick = cbAdminClick
    end
    object cbUser: TcxCheckBox
      Left = 28
      Top = 45
      Width = 76
      Height = 21
      Properties.DisplayUnchecked = 'False'
      Properties.Caption = #24405#21333#21592
      TabOrder = 1
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      OnClick = cbUserClick
    end
    object cbGuest: TcxCheckBox
      Left = 28
      Top = 71
      Width = 76
      Height = 21
      Properties.DisplayUnchecked = 'False'
      Properties.Caption = #26597#35810#21592
      TabOrder = 2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      OnClick = cbGuestClick
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 118
    Width = 421
    Height = 185
    Caption = #25317#26377#26435#38480
    TabOrder = 2
    object cxGrid1: TcxGrid
      Left = 10
      Top = 16
      Width = 401
      Height = 159
      TabOrder = 0
      LookAndFeel.Kind = lfStandard
      object cxGridDBTableView1: TcxGridDBTableView
        DataController.DataSource = dsPower
        DataController.Filter.Criteria = {FFFFFFFF0000000000}
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <
          item
            Kind = skCount
            Column = cxGridDBColumn1
          end>
        DataController.Summary.SummaryGroups = <>
        NavigatorButtons.ConfirmDelete = False
        OptionsBehavior.FocusFirstCellOnNewRecord = True
        OptionsBehavior.GoToNextCellOnEnter = True
        OptionsBehavior.FocusCellOnCycle = True
        OptionsView.NavigatorOffset = 40
        OptionsView.ColumnAutoWidth = True
        OptionsView.GridLines = glNone
        OptionsView.GroupByBox = False
        object cxGridDBColumn1: TcxGridDBColumn
          Caption = #26435#38480#25551#36848
          PropertiesClassName = 'TcxTextEditProperties'
          Properties.Alignment.Horz = taLeftJustify
          Properties.Alignment.Vert = taVCenter
          HeaderAlignmentHorz = taCenter
          HeaderAlignmentVert = vaCenter
          HeaderGlyphAlignmentHorz = taCenter
          Options.Editing = False
          Options.Filtering = False
          Options.Sorting = False
          Width = 64
          DataBinding.FieldName = 'cActDescription'
        end
        object cxGridDBColumn2: TcxGridDBColumn
          Caption = #20801#35768
          PropertiesClassName = 'TcxCheckBoxProperties'
          Properties.Alignment = taCenter
          Properties.DisplayUnchecked = 'False'
          HeaderAlignmentHorz = taCenter
          HeaderAlignmentVert = vaCenter
          HeaderGlyphAlignmentHorz = taCenter
          Options.Filtering = False
          Options.Sorting = False
          Width = 64
          DataBinding.FieldName = 'bAction'
        end
      end
      object cxGridLevel1: TcxGridLevel
        GridView = cxGridDBTableView1
      end
    end
  end
  object cdUser: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 24
    Top = 168
  end
  object dsUser: TDataSource
    DataSet = cdUser
    Left = 24
    Top = 198
  end
  object cdPower: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 64
    Top = 166
  end
  object dsPower: TDataSource
    DataSet = cdPower
    Left = 64
    Top = 198
  end
end