tas310_01.dfm.svn-base

一个用Delphi开发的ERP软件

inherited Tas310_01Form: TTas310_01Form
  Left = -4
  Top = -4
  Width = 808
  Height = 580
  Caption = #20219#21153#35745#21010#36319#36394
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter [0]
    Left = 241
    Top = 80
    Width = 3
    Height = 473
    Cursor = crHSplit
  end
  object Panel1: TPanel [1]
    Left = 0
    Top = 80
    Width = 241
    Height = 473
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    object dbgTas510: TdxDBGrid
      Left = 0
      Top = 0
      Width = 241
      Height = 473
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = 'T510_001'
      ShowGroupPanel = True
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      BorderStyle = bsNone
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnDblClick = dbgTas510DblClick
      DataSource = dsTas510
      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
      OnCustomDrawCell = dbgTas510CustomDrawCell
      object dbgTas510T510_001: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_001'
      end
      object dbgTas510T510_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 200
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_002'
      end
      object dbgTas510T120_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 78
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T120_003'
      end
      object dbgTas510T100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 139
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T100_002'
      end
      object dbgTas510T510_005: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_005'
      end
      object dbgTas510T510_006: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_006'
      end
      object dbgTas510T510_007: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_007'
      end
      object dbgTas510T510_008: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_008'
      end
      object dbgTas510T510_009: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 184
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_009'
      end
      object dbgTas510T510_011: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 54
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_011'
      end
      object dbgTas510T510_012: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 58
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_012'
        DisplayFormat = '0.00'
        Nullable = False
      end
      object dbgTas510T510_025: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_025'
      end
      object dbgTas510T510_026: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_026'
      end
      object dbgTas510T510_013: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 58
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_013'
        DisplayFormat = '0.00'
        Nullable = False
      end
      object dbgTas510T510_027: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_027'
      end
      object dbgTas510T510_028: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_028'
      end
      object dbgTas510T510_014: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 54
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_014'
        DisplayFormat = '0.00%'
        Nullable = False
      end
      object dbgTas510T510_015: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_015'
      end
      object dbgTas510O150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_002'
      end
      object dbgTas510O150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 364
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_003'
      end
      object dbgTas510I150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 184
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I150_002'
      end
      object dbgTas510I150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 364
        BandIndex = 0
        RowIndex = 0
        FieldName = 'I150_003'
      end
      object dbgTas510T510_018: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 184
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_018'
      end
      object dbgTas510T510_020: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_020'
      end
      object dbgTas510T510_021: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_021'
      end
      object dbgTas510T510_022: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_022'
      end
      object dbgTas510T510_023: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T510_023'
      end
      object dbgTas510T120_005: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T120_005'
      end
    end
  end
  object Panel2: TPanel [2]
    Left = 244
    Top = 80
    Width = 556
    Height = 473
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object Splitter2: TSplitter
      Left = 0
      Top = 237
      Width = 556
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object PageControl1: TPageControl
      Left = 0
      Top = 65
      Width = 556
      Height = 172
      ActivePage = TabSheet1
      Align = alTop
      Style = tsFlatButtons
      TabIndex = 0
      TabOrder = 0
      object TabSheet1: TTabSheet
        Caption = #24037#21333#21015#34920
        object dbgTas520: TdxDBGrid
          Left = 0
          Top = 0
          Width = 548
          Height = 142
          Bands = <
            item
            end>
          DefaultLayout = True
          HeaderPanelRowCount = 1
          KeyField = 'T520_001'
          ShowGroupPanel = True
          SummaryGroups = <>
          SummarySeparator = ', '
          Align = alClient
          BorderStyle = bsNone
          PopupMenu = PopupMenu1
          TabOrder = 0
          OnDblClick = dbgTas510DblClick
          DataSource = dsTas520
          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 dbgTas520T520_001: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 80
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_001'
          end
          object dbgTas520T520_003: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 173
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_003'
          end
          object dbgTas520T520_004: TdxDBGridColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 54
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_004'
          end
          object dbgTas520T520_005: TdxDBGridCurrencyColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 58
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_005'
            DisplayFormat = '0.00'
            Nullable = False
          end
          object dbgTas520T520_006: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_006'
          end
          object dbgTas520T520_007: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_007'
          end
          object dbgTas520T520_008: TdxDBGridCurrencyColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 58
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_008'
            DisplayFormat = '0.00'
            Nullable = False
          end
          object dbgTas520T520_009: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_009'
          end
          object dbgTas520T520_010: TdxDBGridDateColumn
            DisableEditor = True
            HeaderAlignment = taCenter
            Width = 112
            BandIndex = 0
            RowIndex = 0
            FieldName = 'T520_010'
          end
        end
      end
      object TabSheet2: TTabSheet
        Caption = #24037#21333#26126#32454
        ImageIndex = 1
        object ScrollBox1: TScrollBox
          Left = 0
          Top = 0
          Width = 513
          Height = 142
          Align = alClient
          TabOrder = 0
          object lblWorkCode: TLabel
            Tag = 1
            Left = 8
            Top = 16
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #24037#21333#32534#21495
          end
          object lblDays: TLabel
            Left = 8
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #39044#35745#24037#26102
          end
          object lblFactDays: TLabel
            Left = 8
            Top = 64
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #23454#38469#24037#26102
          end
          object lblFromDate: TLabel
            Tag = 1
            Left = 168
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #39044#35745#24320#22987
          end
          object lblFactFromDate: TLabel
            Left = 168
            Top = 64
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #23454#38469#24320#22987
          end
          object lblToDate: TLabel
            Tag = 1
            Left = 336
            Top = 40
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #39044#35745#23436#25104
          end
          object lblFactToDate: TLabel
            Left = 336
            Top = 64
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #23454#38469#23436#25104
          end
          object lblPerson: TLabel
            Tag = 1
            Left = 192
            Top = 16
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #25191#34892#20154#21592
          end
          object lblResolvent: TLabel
            Left = 8
            Top = 88
            Width = 48
            Height = 12
            Alignment = taRightJustify
            Caption = #35299#20915#26041#27861
          end
          object edtDays: TEdit
            Left = 64
            Top = 32
            Width = 49
            Height = 20
            Color = clBtnFace
            TabOrder = 0
            Text = '1'
          end
          object DBEdit5: TDBEdit
            Left = 64
            Top = 8
            Width = 121
            Height = 20
            DataField = 'T520_001'
            DataSource = dsTas520
            ReadOnly = True
            TabOrder = 1
          end
          object DBEdit6: TDBEdit
            Left = 248
            Top = 8
            Width = 257
            Height = 20
            DataField = 'T520_003'
            DataSource = dsTas520
            ReadOnly = True
            TabOrder = 2
          end
          object DBEdit7: TDBEdit
            Left = 64
            Top = 32
            Width = 57
            Height = 20
            DataField = 'T520_005'
            DataSource = dsTas520
            ReadOnly = True
            TabOrder = 3
          end
          object DBEdit8: TDBEdit
            Left = 128
            Top = 32
            Width = 33
            Height = 20