tas300_01.dfm.svn-base

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

inherited Tas300_01Form: TTas300_01Form
  Left = -4
  Top = -4
  Width = 808
  Height = 580
  Caption = #39033#30446#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 Splitter3: TSplitter
      Left = 0
      Top = 222
      Width = 241
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object dbgTas510: TdxDBGrid
      Left = 0
      Top = 225
      Width = 241
      Height = 248
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = 'T510_001'
      ShowGroupPanel = True
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      BorderStyle = bsNone
      PopupMenu = PopupMenu1
      TabOrder = 1
      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
    object dbgTas500: TdxDBGrid
      Left = 0
      Top = 0
      Width = 241
      Height = 222
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = 'T500_001'
      ShowGroupPanel = True
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alTop
      BorderStyle = bsNone
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnDblClick = dbgTas500DblClick
      DataSource = dsTas500
      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 = dbgTas500CustomDrawCell
      object dbgTas500T500_001: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_001'
      end
      object dbgTas500T500_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 200
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_002'
      end
      object dbgTas500T120_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 71
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T120_003'
      end
      object dbgTas500T500_005: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_005'
      end
      object dbgTas500T500_006: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_006'
      end
      object dbgTas500T500_007: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_007'
      end
      object dbgTas500T500_008: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 127
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_008'
      end
      object dbgTas500T500_010: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 54
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_010'
      end
      object dbgTas500T500_011: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 58
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_011'
        DisplayFormat = '0.00'
        Nullable = False
      end
      object dbgTas500T500_024: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_024'
      end
      object dbgTas500T500_025: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_025'
      end
      object dbgTas500T500_012: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 58
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_012'
        DisplayFormat = '0.00'
        Nullable = False
      end
      object dbgTas500T500_026: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_026'
      end
      object dbgTas500T500_027: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_027'
      end
      object dbgTas500T500_013: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 54
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_013'
        DisplayFormat = '0.00'
        Nullable = False
      end
      object dbgTas500T500_014: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'T500_014'
      end
      object dbgTas500O150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_002'
      end
      object dbgTas500O150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 364
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_003'
      end
      object dbgTas500I150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 184