tas300_01.dfm.svn-base

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

      Style = tsFlatButtons
      TabIndex = 0
      TabOrder = 1
      object TabSheet3: TTabSheet
        Caption = #27719#25253#21015#34920
        object dbgTas530: TdxDBGrid
          Left = 0
          Top = 0
          Width = 548
          Height = 203
          Bands = <
            item
            end>
          DefaultLayout = True
          HeaderPanelRowCount = 1
          KeyField = 'T530_001'
          ShowGroupPanel = True
          SummaryGroups = <>
          SummarySeparator = ', '
          Align = alClient
          BorderStyle = bsNone
          PopupMenu = PopupMenu1
          TabOrder = 0
          OnDblClick = dbgTas510DblClick
          DataSource = dsTas530
          Filter.Criteria = {00000000}
          HeaderColor = 15262169
          HideFocusRect = True
          LookAndFeel = lfUltraFlat
          OptionsBehavior = [edgoAutoSearch, edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoTabThrough, edgoVertThrough]
          OptionsDB = [edgoCancelOnExit, edgoCanNavigation, edgoConfirmDelete, edgoUseBookmarks]
          OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
          OnBackgroundDrawEvent = dbgTas520BackgroundDrawEvent
          object dbgTas530T530_001: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 80
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_001'
          end
          object dbgTas530T530_003: TdxDBGridCurrencyColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 54
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_003'
            DisplayFormat = '0.00%'
            Nullable = False
          end
          object dbgTas530T530_004: TdxDBGridCurrencyColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 58
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_004'
            DisplayFormat = '0.00'
            Nullable = False
          end
          object dbgTas530T530_007: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 54
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_007'
          end
          object dbgTas530T530_005: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_005'
          end
          object dbgTas530T530_006: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T530_006'
          end
          object dbgTas530T120_003: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 80
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T120_003'
          end
        end
      end
      object TabSheet4: TTabSheet
        Caption = #27719#25253#26126#32454
        ImageIndex = 1
        object ScrollBox2: TScrollBox
          Left = 0
          Top = 0
          Width = 513
          Height = 203
          Align = alClient
          TabOrder = 0
          object lblRepCode: TLabel
            Tag = 1
            Left = 8
            Top = 16
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #27719#25253#21333#21495
          end
          object lblRepDays: TLabel
            Tag = 1
            Left = 8
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #27719#25253#24037#26102
          end
          object lblSupport: TLabel
            Left = 8
            Top = 64
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #21327#21161#20154#21592
          end
          object lblRepDate: TLabel
            Tag = 1
            Left = 192
            Top = 16
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #36215#27490#26085#26399
          end
          object lblPercent: TLabel
            Tag = 1
            Left = 192
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #23436#24037#27604#29575
          end
          object lblVendor: TLabel
            Left = 192
            Top = 64
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #21327#21161#20844#21496
          end
          object lblSupportDays: TLabel
            Left = 328
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #21327#21161#24037#26102
          end
          object Label9: TLabel
            Left = 374
            Top = 12
            Width = 6
            Height = 12
            Caption = '-'
          end
          object lblContinue: TLabel
            Tag = 1
            Left = 8
            Top = 88
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #21518#32493#22788#29702
          end
          object lblDelay: TLabel
            Left = 192
            Top = 88
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #25302#26399#21407#22240
          end
          object lblRepMemo: TLabel
            Tag = 1
            Left = 8
            Top = 112
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #27719#25253#20869#23481
          end
          object DBEdit15: TDBEdit
            Left = 64
            Top = 8
            Width = 121
            Height = 20
            DataField = 'T530_001'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 0
          end
          object DBEdit16: TDBEdit
            Left = 248
            Top = 8
            Width = 121
            Height = 20
            DataField = 'T530_005'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 1
          end
          object DBEdit17: TDBEdit
            Left = 384
            Top = 8
            Width = 121
            Height = 20
            DataField = 'T530_006'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 2
          end
          object DBEdit18: TDBEdit
            Left = 64
            Top = 32
            Width = 73
            Height = 20
            DataField = 'T530_004'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 3
          end
          object DBEdit19: TDBEdit
            Left = 144
            Top = 32
            Width = 41
            Height = 20
            DataField = 'T530_007'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 4
          end
          object DBEdit20: TDBEdit
            Left = 248
            Top = 32
            Width = 73
            Height = 20
            DataField = 'T530_003'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 5
          end
          object DBEdit21: TDBEdit
            Left = 464
            Top = 32
            Width = 41
            Height = 20
            DataField = 'T530_007'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 6
          end
          object DBEdit22: TDBEdit
            Left = 384
            Top = 32
            Width = 73
            Height = 20
            DataField = 'T530_018'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 7
          end
          object DBEdit23: TDBEdit
            Left = 64
            Top = 56
            Width = 121
            Height = 20
            DataField = 'T530_017'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 8
          end
          object DBEdit24: TDBEdit
            Left = 248
            Top = 56
            Width = 257
            Height = 20
            DataField = 'W150_003'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 9
          end
          object DBEdit25: TDBEdit
            Left = 64
            Top = 80
            Width = 121
            Height = 20
            DataField = 'T120_003'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 10
          end
          object DBEdit26: TDBEdit
            Left = 248
            Top = 80
            Width = 257
            Height = 20
            DataField = 'T530_009'
            DataSource = dsTas530
            ReadOnly = True
            TabOrder = 11
          end
          object DBMemo2: TDBMemo
            Left = 64
            Top = 104
            Width = 441
            Height = 81
            DataField = 'T530_008'
            DataSource = dsTas530
            ReadOnly = True
            ScrollBars = ssVertical
            TabOrder = 12
          end
        end
        object ToolBar3: TToolBar
          Left = 513
          Top = 0
          Width = 35
          Height = 203
          Align = alRight
          AutoSize = True
          BorderWidth = 1
          ButtonHeight = 26
          ButtonWidth = 27
          Caption = 'ToolBar1'
          EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
          Flat = True
          Images = SYSDM.imgBtn
          TabOrder = 1
          object ToolButton8: TToolButton
            Left = 0
            Top = 0
            Action = ActFirst3
            Wrap = True
          end
          object ToolButton9: TToolButton
            Left = 0
            Top = 26
            Action = ActPrior3
            Wrap = True
          end
          object ToolButton10: TToolButton
            Left = 0
            Top = 52
            Action = ActNext3
            Wrap = True
          end
          object ToolButton11: TToolButton
            Left = 0
            Top = 78
            Action = ActLast3
            Wrap = True
          end
          object ToolButton12: TToolButton
            Left = 0
            Top = 104
            Action = ActLocate3
          end
        end
      end
    end
    object Panel4: TPanel
      Left = 0
      Top = 0
      Width = 556
      Height = 65
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 2
      object lblTaskCode: TLabel
        Tag = 1
        Left = 24
        Top = 16
        Width = 48
        Height = 12
        Alignment = taRightJustify
        Caption = #20219#21153#32534#21495
      end
      object lblTaskName: TLabel
        Tag = 1
        Left = 184
        Top = 16
        Width = 48
        Height = 12
        Alignment = taRightJustify
        Caption = #20219#21153#21517#31216
      end
      object lblTaskStatus: TLabel
        Tag = 1
        Left = 24
        Top = 40
        Width = 48
        Height = 12
        Alignment = taRightJustify
        Caption = #20219#21153#29366#24577
      end
      object lblTaskClass: TLabel
        Tag = 1
        Left = 184
        Top = 40
        Width = 48
        Height = 12
        Alignment = taRightJustify
        Caption = #20219#21153#31867#21035
      end
      object DBEdit1: TDBEdit
        Left = 80
        Top = 8
        Width = 97
        Height = 20
        DataField = 'T510_001'
        DataSource = dsTas510
        ReadOnly = True
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 240
        Top = 8
        Width = 281
        Height = 20
        DataField = 'T510_002'
        DataSource = dsTas510
        ReadOnly = True
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 80
        Top = 32
        Width = 97
        Height = 20
        DataField = 'T120_003'
        DataSource = dsTas510
        ReadOnly = True
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 240
        Top = 32
        Width = 281
        Height = 20
        DataField = 'T100_002'
        DataSource = dsTas510
        ReadOnly = True
        TabOrder = 3
      end
    end