ord310_01.dfm.svn-base

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

inherited Ord310_01Form: TOrd310_01Form
  Left = -4
  Top = -4
  Width = 808
  Height = 580
  Caption = #38144#21806#25253#20215#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 dbgOrd510: 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 = dbgOrd510DblClick
      DataSource = dsOrd510
      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 = dbgPur510BackgroundDrawEvent
      OnCustomDrawCell = dbgOrd510CustomDrawCell
      object dbgOrd510O510A_001: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 120
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_001'
      end
      object dbgOrd510O100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 120
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O100_002'
      end
      object dbgOrd510O510A_003: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_003'
      end
      object dbgOrd510O510A_004: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_004'
      end
      object dbgOrd510H150_002: TdxDBGridLookupColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_002'
      end
      object dbgOrd510H150_003: TdxDBGridLookupColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_003'
      end
      object dbgOrd510G100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_002'
      end
      object dbgOrd510G100_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_003'
      end
      object dbgOrd510O510A_008: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_008'
        Nullable = False
      end
      object dbgOrd510G110_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G110_002'
      end
      object dbgOrd510O510A_010: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_010'
      end
      object dbgOrd510O510A_012: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_012'
      end
      object dbgOrd510O510A_013: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_013'
        Nullable = False
      end
      object dbgOrd510O510A_014: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_014'
      end
      object dbgOrd510O510A_015: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_015'
      end
      object dbgOrd510O510A_016: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_016'
      end
      object dbgOrd510O150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_002'
      end
      object dbgOrd510O150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_003'
      end
      object dbgOrd510O150_005: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_005'
      end
      object dbgOrd510O150_006: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_006'
      end
      object dbgOrd510O150_012: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_012'
      end
      object dbgOrd510O510A_018: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_018'
      end
      object dbgOrd510O510A_019: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_019'
      end
      object dbgOrd510O510A_022: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_022'
      end
      object dbgOrd510O510A_023: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_023'
      end
      object dbgOrd510O510A_024: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_024'
      end
      object dbgOrd510O510A_025: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O510A_025'
      end
    end
    object dbgOrd500: 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 = dbgOrd500DblClick
      DataSource = dsOrd500
      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 = dbgPur510BackgroundDrawEvent
      OnCustomDrawCell = dbgOrd500CustomDrawCell
      object dbgOrd500O500A_001: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 120
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_001'
      end
      object dbgOrd500O100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 120
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O100_002'
      end
      object dbgOrd500O500A_003: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_003'
      end
      object dbgOrd500O500A_004: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_004'
      end
      object dbgOrd500H150_002: TdxDBGridLookupColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_002'
      end
      object dbgOrd500H150_003: TdxDBGridLookupColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_003'
      end
      object dbgOrd500G100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_002'
      end
      object dbgOrd500G100_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_003'
      end
      object dbgOrd500O500A_008: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_008'
        Nullable = False
      end
      object dbgOrd500G110_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 80
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G110_002'
      end
      object dbgOrd500O500A_010: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_010'
      end
      object dbgOrd500O500A_012: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_012'
      end
      object dbgOrd500O500A_013: TdxDBGridCurrencyColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_013'
        Nullable = False
      end
      object dbgOrd500O500A_014: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_014'
      end
      object dbgOrd500O500A_015: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_015'
      end
      object dbgOrd500O500A_016: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O500A_016'
      end
      object dbgOrd500O150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_002'
      end
      object dbgOrd500O150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_003'
      end
      object dbgOrd500O150_005: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_005'
      end
      object dbgOrd500O150_006: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_006'
      end
      object dbgOrd500O150_012: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_012'