gld600_02.dfm.svn-base

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

inherited Gld600_02Form: TGld600_02Form
  Left = -4
  Top = -4
  Width = 808
  Height = 580
  Caption = #24635#20998#31867#24080
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 43
    Width = 800
    Height = 38
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 796
      Height = 34
      Align = alClient
      Stretch = True
    end
    object Label1: TLabel
      Left = 15
      Top = 9
      Width = 84
      Height = 20
      Caption = #24635#20998#31867#24080
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #23435#20307
      Font.Pitch = fpFixed
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 591
      Top = 7
      Width = 60
      Height = 12
      Caption = #20250#35745#26399#38388#65306
      Transparent = True
    end
    object Label3: TLabel
      Left = 591
      Top = 22
      Width = 36
      Height = 12
      Caption = #24065#21035#65306
      Transparent = True
    end
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 800
    Height = 43
    AutoSize = True
    Bands = <
      item
        Control = ToolBar2
        ImageIndex = -1
        MinHeight = 39
        Width = 796
      end>
    object ToolBar2: TToolBar
      Left = 9
      Top = 0
      Width = 783
      Height = 39
      AutoSize = True
      ButtonHeight = 39
      ButtonWidth = 31
      Caption = 'ToolBar2'
      EdgeBorders = []
      Flat = True
      Images = SYSDM.ImageList1
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 0
      object tlbFirst: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = #26368#21069
        ImageIndex = 5
      end
      object tlbPrior: TToolButton
        Left = 35
        Top = 0
        AutoSize = True
        Caption = #19978#31227
        ImageIndex = 6
      end
      object tlbNext: TToolButton
        Left = 70
        Top = 0
        AutoSize = True
        Caption = #19979#31227
        ImageIndex = 7
      end
      object tlbLast: TToolButton
        Left = 105
        Top = 0
        AutoSize = True
        Caption = #26368#21518
        ImageIndex = 8
      end
      object ToolButton1: TToolButton
        Left = 140
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object ToolButton2: TToolButton
        Left = 148
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object tlbSearch: TToolButton
        Left = 156
        Top = 0
        AutoSize = True
        Caption = #26597#25214
        ImageIndex = 9
      end
      object tlbPrint: TToolButton
        Left = 191
        Top = 0
        AutoSize = True
        Caption = #25171#21360
        ImageIndex = 10
      end
      object tlbSelect: TToolButton
        Left = 226
        Top = 0
        AutoSize = True
        Caption = #31579#36873
        ImageIndex = 14
      end
      object ToolButton4: TToolButton
        Left = 261
        Top = 0
        Width = 8
        Caption = 'ToolButton4'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object tlbExit: TToolButton
        Left = 269
        Top = 0
        AutoSize = True
        Caption = #36864#20986
        ImageIndex = 13
      end
    end
  end
  object dxDBGrid1: TdxDBGrid
    Left = 0
    Top = 81
    Width = 800
    Height = 472
    Bands = <
      item
      end>
    DefaultLayout = True
    HeaderPanelRowCount = 1
    SummaryGroups = <>
    SummarySeparator = ', '
    Align = alClient
    TabOrder = 2
    DataSource = DataSource1
    Filter.Criteria = {00000000}
    HideFocusRect = True
    OptionsView = [edgoBandHeaderWidth, edgoRowSelect, edgoUseBitmap]
    object dxDBGrid1G500_001: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_001'
    end
    object dxDBGrid1G500_002: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_002'
    end
    object dxDBGrid1G500_003: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_003'
    end
    object dxDBGrid1G500_004: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_004'
    end
    object dxDBGrid1G500_005: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_005'
    end
    object dxDBGrid1G500_006: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_006'
    end
    object dxDBGrid1G500_007: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_007'
    end
    object dxDBGrid1G500_008: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_008'
    end
    object dxDBGrid1G500_009: TdxDBGridMaskColumn
      BandIndex = 0
      RowIndex = 0
      FieldName = 'G500_009'
    end
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbExit, pbPageSetup]
    Left = 216
    Top = 72
    ReportForm = {18000000}
  end
  object frDBDataSet1: TfrDBDataSet
    Left = 248
    Top = 72
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 112
    Top = 152
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspGld500'
    Left = 144
    Top = 152
  end
end