rab150_01.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Rab150_01Form: TRab150_01Form
  Left = 169
  Top = 90
  Width = 618
  Height = 428
  HelpContext = 54
  Caption = #23601#39184#36164#26009#32500#25252
  PixelsPerInch = 96
  TextHeight = 12
  inherited CoolBar1: TCoolBar
    Width = 610
    Bands = <
      item
        Control = ToolBar2
        ImageIndex = -1
        MinHeight = 39
        Width = 606
      end>
    inherited ToolBar2: TToolBar
      Width = 593
    end
  end
  inherited Panel1: TPanel
    Width = 610
    inherited Image1: TImage
      Width = 606
    end
  end
  inherited PageControl1: TPageControl
    Width = 610
    Height = 321
    inherited TabSheet1: TTabSheet
      inherited ScrollBox2: TScrollBox
        Width = 602
        Height = 291
        inherited dxDBGrid1: TdxDBGrid
          Width = 598
          Height = 287
          Filter.Criteria = {00000000}
          object dxDBGrid1H150_002: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 71
            BandIndex = 0
            RowIndex = 0
            FieldName = 'H150_002'
          end
          object dxDBGrid1H150_003: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 94
            BandIndex = 0
            RowIndex = 0
            FieldName = 'H150_003'
          end
          object dxDBGrid1R150_002: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 56
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_002'
          end
          object dxDBGrid1R150_003: TdxDBGridMaskColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_003'
          end
          object dxDBGrid1R150_004: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 91
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_004'
          end
          object dxDBGrid1R150_005: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 94
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_005'
          end
          object dxDBGrid1R150_006: TdxDBGridMaskColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_006'
          end
          object dxDBGrid1R150_007: TdxDBGridMaskColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_007'
          end
          object dxDBGrid1R150_008: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 184
            BandIndex = 0
            RowIndex = 0
            FieldName = 'R150_008'
          end
        end
      end
    end
    inherited TabSheet2: TTabSheet
      inherited ScrollBox1: TScrollBox
        Width = 602
        Height = 291
        object Label1: TLabel
          Tag = 1
          Left = 120
          Top = 88
          Width = 24
          Height = 12
          Caption = #39184#21035
        end
        object Label2: TLabel
          Tag = 1
          Left = 96
          Top = 152
          Width = 48
          Height = 12
          Caption = #23601#39184#25968#37327
          FocusControl = DBEdit2
        end
        object Label3: TLabel
          Tag = 1
          Left = 96
          Top = 120
          Width = 48
          Height = 12
          Caption = #36215#22987#26085#26399
        end
        object Label4: TLabel
          Tag = 1
          Left = 328
          Top = 120
          Width = 48
          Height = 12
          Caption = #32467#26463#26085#26399
        end
        object Label5: TLabel
          Tag = 1
          Left = 360
          Top = 152
          Width = 24
          Height = 12
          Caption = #21333#20215
          FocusControl = DBEdit5
        end
        object Label6: TLabel
          Tag = 1
          Left = 96
          Top = 184
          Width = 48
          Height = 12
          Caption = #37329#39069#23567#35745
          FocusControl = DBEdit6
        end
        object Label7: TLabel
          Left = 120
          Top = 216
          Width = 24
          Height = 12
          Caption = #22791#27880
          FocusControl = DBEdit7
        end
        object Label8: TLabel
          Tag = 1
          Left = 96
          Top = 56
          Width = 48
          Height = 12
          Caption = #21592#24037#32534#21495
        end
        object SpeedButton1: TSpeedButton
          Left = 274
          Top = 48
          Width = 21
          Height = 20
          Flat = True
          Glyph.Data = {
            F6060000424DF606000000000000360000002800000018000000180000000100
            180000000000C006000000000000000000000000000000000000FF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
            000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
            000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
            8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
            00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
            000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
            FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
            000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00FFFFFF80808080808000000000000000000000000000000000000000000000
            0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
            00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
            000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
            0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
            BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
            0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
            0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
          OnClick = SpeedButton1Click
        end
        object DBEdit2: TDBEdit
          Left = 152
          Top = 144
          Width = 121
          Height = 20
          DataField = 'R150_003'
          DataSource = DataSource1
          TabOrder = 3
          OnExit = DBEdit2Exit
          OnKeyPress = DBEdit2KeyPress
        end
        object DBEdit5: TDBEdit
          Left = 392
          Top = 144
          Width = 121
          Height = 20
          DataField = 'R150_006'
          DataSource = DataSource1
          TabOrder = 4
          OnExit = DBEdit2Exit
          OnKeyPress = DBEdit2KeyPress
        end
        object DBEdit6: TDBEdit
          Left = 152
          Top = 176
          Width = 121
          Height = 20
          Color = clWhite
          DataField = 'R150_007'
          DataSource = DataSource1
          TabOrder = 5
        end
        object DBEdit7: TDBEdit
          Left = 152
          Top = 208
          Width = 361
          Height = 20
          DataField = 'R150_008'
          DataSource = DataSource1
          TabOrder = 6
        end
        object wwDBDateTimePicker1: TwwDBDateTimePicker
          Left = 152
          Top = 112
          Width = 121
          Height = 20
          CalendarAttributes.Font.Charset = DEFAULT_CHARSET
          CalendarAttributes.Font.Color = clWindowText
          CalendarAttributes.Font.Height = -11
          CalendarAttributes.Font.Name = 'MS Sans Serif'
          CalendarAttributes.Font.Style = []
          CalendarAttributes.PopupYearOptions.ShowEditYear = True
          DataField = 'R150_004'
          DataSource = DataSource1
          Epoch = 1950
          ShowButton = True
          TabOrder = 1
        end
        object wwDBDateTimePicker2: TwwDBDateTimePicker
          Left = 392
          Top = 112
          Width = 121
          Height = 20
          CalendarAttributes.Font.Charset = DEFAULT_CHARSET
          CalendarAttributes.Font.Color = clWindowText
          CalendarAttributes.Font.Height = -11
          CalendarAttributes.Font.Name = 'MS Sans Serif'
          CalendarAttributes.Font.Style = []
          CalendarAttributes.PopupYearOptions.ShowEditYear = True
          DataField = 'R150_005'
          DataSource = DataSource1
          Epoch = 1950
          ShowButton = True
          TabOrder = 2
        end
        object DBEdit1: TDBEdit
          Left = 304
          Top = 48
          Width = 209
          Height = 20
          DataField = 'H150_003'
          DataSource = DataSource1
          Enabled = False
          TabOrder = 7
        end
        object ComboBox1: TComboBox
          Left = 152
          Top = 80
          Width = 121
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 0
          Items.Strings = (
            '1='#26089#39184
            '2='#20013#39184
            '3='#26202#39184
            '4='#22812#39184)
        end
        object Edit1: TEdit
          Left = 152
          Top = 48
          Width = 121
          Height = 20
          TabOrder = 8
          OnExit = Edit1Exit
          OnKeyDown = Edit1KeyDown
        end
      end
    end
  end
  inherited ADOQuery1: TADOQuery
    CursorType = ctStatic
    OnCalcFields = ADOQuery1CalcFields
    SQL.Strings = (
      'select * from RAB150')
    object ADOQuery1R150_001: TIntegerField
      DisplayLabel = #21592#24037#32534#21495
      FieldName = 'R150_001'
      Visible = False
    end
    object ADOQuery1R150_002: TSmallintField
      DisplayLabel = #39184#21035
      FieldName = 'R150_002'
      OnGetText = ADOQuery1R150_002GetText
    end
    object ADOQuery1R150_003: TIntegerField
      DisplayLabel = #23601#39184#25968#37327
      FieldName = 'R150_003'
    end
    object ADOQuery1R150_004: TDateTimeField
      DisplayLabel = #36215#22987#26085#26399
      FieldName = 'R150_004'
    end
    object ADOQuery1R150_005: TDateTimeField
      DisplayLabel = #32467#26463#26085#26399
      FieldName = 'R150_005'
    end
    object ADOQuery1R150_006: TFloatField
      DisplayLabel = #21333#20215
      FieldName = 'R150_006'
    end
    object ADOQuery1R150_007: TFloatField
      DisplayLabel = #37329#39069#23567#35745
      FieldName = 'R150_007'
    end
    object ADOQuery1R150_008: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'R150_008'
      Size = 30
    end
    object ADOQuery1H150_002: TStringField
      DisplayLabel = #21592#24037#32534#21495
      FieldKind = fkCalculated
      FieldName = 'H150_002'
      FixedChar = True
      Size = 10
      Calculated = True
    end
    object ADOQuery1H150_003: TStringField
      DisplayLabel = #21592#24037#22995#21517
      FieldKind = fkCalculated
      FieldName = 'H150_003'
      Calculated = True
    end
  end
  inherited pmGrid: TPopupMenu
    Left = 384
    Top = 144
  end
  object qryHrm150: TADOQuery
    CacheSize = 1000
    Connection = SYSDM.ADOC
    Parameters = <>
    SQL.Strings = (
      'select * from HRM150')
    Left = 408
    Top = 192
    object qryHrm150H150_001: TAutoIncField
      DisplayLabel = #30005#33041#32534#21495
      FieldName = 'H150_001'
      ReadOnly = True
      Visible = False
    end
    object qryHrm150H150_002: TStringField
      DisplayLabel = #21592#24037#32534#21495
      FieldName = 'H150_002'
      FixedChar = True
      Size = 10
    end
    object qryHrm150H150_003: TStringField
      DisplayLabel = #21592#24037#22995#21517
      FieldName = 'H150_003'
    end
  end
end