ubjd_lb.dfm

来自「工廠採購管理系統」· DFM 代码 · 共 562 行 · 第 1/2 页

DFM
562
字号
        FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC
        FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000080000080
        000000808000800000008000800080800000C0C0C00080808000191919004C4C
        4C00B2B2B200E5E5E500C8AC2800E0CC6600F2EABF00B59B2400D8E9EC009933
        6600D075A300ECC6D900646F710099A8AC00E2EFF10000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8B46C6C6CE8
        E8E8E8E8B46C6C6CE8E8E8E2DFDFDFE8E8E8E8E8E2DFDFDFE8E8E8B49090906C
        E8E8E8B49090906CE8E8E8E2818181DFE8E8E8E2818181DFE8E8E8E8B4909090
        6CE8B49090906CE8E8E8E8E8E2818181DFE8E2818181DFE8E8E8E8E8E8B49090
        906C9090906CE8E8E8E8E8E8E8E2818181DF818181DFE8E8E8E8E8E8E8E8B490
        909090906CE8E8E8E8E8E8E8E8E8E28181818181DFE8E8E8E8E8E8E8E8E8E8B4
        9090906CE8E8E8E8E8E8E8E8E8E8E8E2818181DFE8E8E8E8E8E8E8E8E8E8B490
        909090906CE8E8E8E8E8E8E8E8E8E28181818181DFE8E8E8E8E8E8E8E8B49090
        906C9090906CE8E8E8E8E8E8E8E2818181DF818181DFE8E8E8E8E8E8B4909090
        6CE8B49090906CE8E8E8E8E8E2818181DFE8E2818181DFE8E8E8E8B49090906C
        E8E8E8B49090906CE8E8E8E2818181DFE8E8E8E2818181DFE8E8E8B4B4B4B4E8
        E8E8E8E8B4B4B4B4E8E8E8E2E2E2E2E8E8E8E8E8E2E2E2E2E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
        E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8}
      NumGlyphs = 2
    end
    object ComboBox1: TComboBox
      Left = 296
      Top = 8
      Width = 113
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 4
      OnChange = ComboBox1Change
    end
    object ComboBox2: TComboBox
      Left = 464
      Top = 8
      Width = 113
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 5
      OnChange = ComboBox2Change
    end
    object dtp1: TRzDateTimePicker
      Left = 584
      Top = 8
      Width = 97
      Height = 24
      Date = 38810.466168645840000000
      Time = 38810.466168645840000000
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnExit = dtp1Exit
    end
    object dtp2: TRzDateTimePicker
      Left = 696
      Top = 8
      Width = 97
      Height = 24
      Date = 38810.466286759260000000
      Time = 38810.466286759260000000
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnExit = dtp2Exit
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 815
    Height = 479
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 1
    object DBGridEh1: TDBGridEh
      Left = 0
      Top = 0
      Width = 815
      Height = 479
      TabStop = False
      Align = alClient
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      FooterRowCount = 1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghTraceColSizing, dghIncSearch, dghPreferIncSearch, dghRecordMoving]
      ParentFont = False
      ReadOnly = True
      SortLocal = True
      SumList.Active = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = #25253#20215#21333#21495
          Footers = <
            item
              Alignment = taRightJustify
              EndEllipsis = True
              Value = #21512#35745#37329#39069#65306
              ValueType = fvtStaticText
            end>
          Width = 67
        end
        item
          EditButtons = <>
          FieldName = #37319#36141#35745#21010#21333#21495
          Footers = <
            item
              Color = clGradientActiveCaption
              FieldName = #37329#39069
              ValueType = fvtSum
            end>
          Width = 86
        end
        item
          EditButtons = <>
          FieldName = #21407#25253#20215#21333#21495
          Footers = <
            item
              Value = #24635#25968#37327#65306
              ValueType = fvtStaticText
            end>
          Width = 89
        end
        item
          EditButtons = <>
          FieldName = #20379#24212#21830#20195#30721
          Footers = <
            item
              FieldName = #25968#37327
              ValueType = fvtSum
            end>
          Width = 85
        end
        item
          EditButtons = <>
          FieldName = #20379#24212#21830#21517#31216
          Footers = <>
          Width = 70
        end
        item
          EditButtons = <>
          FieldName = #29289#26009#20195#30721
          Footers = <>
          Width = 72
        end
        item
          EditButtons = <>
          FieldName = #29289#26009#21517#31216
          Footers = <>
          Width = 177
        end
        item
          EditButtons = <>
          FieldName = #39068#33394
          Footers = <>
          Width = 47
        end
        item
          EditButtons = <>
          FieldName = #33394#21495
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #21333#20301
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #21333#20215
          Footers = <
            item
              FieldName = #21333#20215
              Value = #24179#22343#21333#20215#65306
              ValueType = fvtAvg
            end>
          Width = 60
        end
        item
          EditButtons = <>
          FieldName = #25968#37327
          Footers = <
            item
              FieldName = #25968#37327
              Value = 'sum('#25968#37327' )'
              ValueType = fvtSum
            end>
          Width = 77
        end
        item
          EditButtons = <>
          FieldName = #37329#39069
          Footer.FieldName = #37329#39069
          Footer.ValueType = fvtSum
          Footer.WordWrap = True
          Footers = <
            item
              Alignment = taCenter
              Value = #37329#39069
              ValueType = fvtSum
            end>
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = #36127#36131#20154
          Footers = <>
          Width = 53
        end
        item
          EditButtons = <>
          FieldName = #26085#26399
          Footers = <>
          Width = 87
        end
        item
          EditButtons = <>
          FieldName = #22791#27880
          Footers = <>
        end>
    end
  end
  object ADOQuery1: TADOQuery
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from view_wlbjlb')
    Left = 272
    Top = 129
  end
  object ADOQuery2: TADOQuery
    Parameters = <>
    Left = 416
    Top = 145
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 152
    Top = 193
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?