mattune.dfm

文件包含程序源原文件

          OnChange = ControlChange
          OnEnter = ControlEnter
          OnExit = ControlExit
          OnKeyDown = ControlKeyDown
        end
        object ComboBox1: TComboBox
          Left = 112
          Top = 110
          Width = 222
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          ItemHeight = 12
          TabOrder = 24
        end
        object edtGuageID: TEx2NumEdit
          Left = 112
          Top = 110
          Width = 46
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 25
          OnChange = ControlChange
          OnEnter = ControlEnter
          OnExit = ControlExit
          OnKeyDown = ControlKeyDown
          FixDecimal = 0
        end
        object edtGuageName: TEdit
          Left = 158
          Top = 110
          Width = 158
          Height = 20
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          MaxLength = 30
          ReadOnly = True
          TabOrder = 26
          OnChange = ControlChange
          OnEnter = ControlEnter
          OnExit = ControlExit
          OnKeyDown = ControlKeyDown
        end
      end
      object Panel5: TPanel
        Left = 0
        Top = 286
        Width = 729
        Height = 263
        Align = alClient
        BevelOuter = bvLowered
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 1
        object Panel10: TPanel
          Left = 1
          Top = 1
          Width = 727
          Height = 261
          Align = alClient
          TabOrder = 0
          object tabsGroup: TTabControl
            Left = 113
            Top = 1
            Width = 613
            Height = 259
            Align = alClient
            TabOrder = 0
            Tabs.Strings = (
              '1'
              '2'
              '3'
              '4')
            TabIndex = 0
            OnChange = tabsGroupChange
            object ListViewMatIN: TListView
              Left = 4
              Top = 23
              Width = 605
              Height = 188
              Align = alClient
              Columns = <>
              ReadOnly = True
              RowSelect = True
              TabOrder = 0
              ViewStyle = vsReport
            end
            object Panel11: TPanel
              Left = 4
              Top = 211
              Width = 605
              Height = 6
              Align = alBottom
              BevelOuter = bvLowered
              TabOrder = 1
            end
            object Panel7: TPanel
              Left = 4
              Top = 217
              Width = 605
              Height = 38
              Align = alBottom
              TabOrder = 2
              DesignSize = (
                605
                38)
              object btnPaper: TBitBtn
                Left = 525
                Top = 6
                Width = 75
                Height = 25
                Anchors = [akRight]
                Caption = '&Excel'
                TabOrder = 0
                Glyph.Data = {
                  F6000000424DF600000000000000760000002800000010000000100000000100
                  0400000000008000000000000000000000001000000000000000000000000000
                  80000080000000808000800000008000800080800000C0C0C000808080000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
                  77777777777777700000000000000006666008888888806EEF0770E6666606EE
                  F077770E66606EEF06077770E606EEF000077777006EEF077777777706EEF007
                  777777706EEF068077777706EEF0E6680777706EEF070E6680770FFFF07770EE
                  EE07000007777700000777777777777777777777777777777777}
              end
            end
          end
          object rdoGroupBy: TRadioGroup
            Left = 1
            Top = 1
            Width = 108
            Height = 259
            Align = alLeft
            Caption = #32676#32452#21306#20998
            Color = clSkyBlue
            Ctl3D = True
            ItemIndex = 0
            Items.Strings = (
              #20381#20379#24212#21830
              #20381#27169#21495
              #20381#20837#24211#21333#21495
              #20381#20837#24211#26085#26399
              #20381#29289#26009#32534#30721
              #20381#21457#31080#21495#30721
              'ALL')
            ParentColor = False
            ParentCtl3D = False
            TabOrder = 1
            OnClick = rdoGroupByClick
          end
          object Panel6: TPanel
            Left = 109
            Top = 1
            Width = 4
            Height = 259
            Align = alLeft
            Caption = 'Panel6'
            TabOrder = 2
          end
        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 280
        Width = 729
        Height = 6
        Align = alTop
        BevelOuter = bvLowered
        Color = clSkyBlue
        TabOrder = 2
      end
    end
  end
  inherited TopPanel: TPanel
    Width = 737
    object Panel14: TPanel
      Left = 1
      Top = 1
      Width = 114
      Height = 39
      Align = alLeft
      BevelOuter = bvLowered
      TabOrder = 0
      object chkView: TCheckBox
        Left = 9
        Top = 14
        Width = 72
        Height = 17
        Caption = #26174#31034#35745#31639
        TabOrder = 0
      end
    end
    object PanView: TPanel
      Left = 115
      Top = 1
      Width = 621
      Height = 39
      Align = alClient
      Alignment = taRightJustify
      BevelOuter = bvLowered
      TabOrder = 1
      object Label9: TLabel
        Left = 5
        Top = 10
        Width = 32
        Height = 16
        Caption = #38271'  '
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Fixedsys'
        Font.Style = []
        ParentFont = False
      end
      object Label10: TLabel
        Left = 95
        Top = 10
        Width = 32
        Height = 16
        Caption = #23485'  '
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Fixedsys'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 182
        Top = 10
        Width = 24
        Height = 16
        Caption = #39640' '
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Fixedsys'
        Font.Style = []
        ParentFont = False
      end
      object Label13: TLabel
        Left = 268
        Top = 11
        Width = 40
        Height = 16
        Caption = #23494#24230' '
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Fixedsys'
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 374
        Top = 9
        Width = 48
        Height = 21
        Caption = #35745#31639
      end
      object lblWeight: TLabel
        Left = 426
        Top = 11
        Width = 96
        Height = 16
        Caption = #37325#37327':       '
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Fixedsys'
        Font.Style = []
        ParentFont = False
      end
      object edtLen: TEx2NumEdit
        Left = 24
        Top = 9
        Width = 68
        Height = 20
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 0
        Comma = False
        CanNegative = False
        FixDecimal = 4
        Value = 100
      end
      object edtWid: TEx2NumEdit
        Left = 112
        Top = 9
        Width = 68
        Height = 20
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 1
        Comma = False
        CanNegative = False
        FixDecimal = 4
        Value = 100
      end
      object edtHeight: TEx2NumEdit
        Left = 200
        Top = 9
        Width = 68
        Height = 20
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 2
        Comma = False
        CanNegative = False
        FixDecimal = 4
        Value = 100
      end
      object edtMidu: TEx2NumEdit
        Left = 302
        Top = 9
        Width = 68
        Height = 20
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 3
        Comma = False
        CanNegative = False
        FixDecimal = 7
        Value = 1.9890099
      end
    end
  end
  object Panel1: TPanel [2]
    Left = 0
    Top = 41
    Width = 737
    Height = 7
    Align = alTop
    BevelOuter = bvLowered
    TabOrder = 2
  end
  inherited ImageList: TImageList
    Left = 648
    Top = 0
  end
end