unit1.dfm

公路站超载检测系统上位机软件系统源程序!

        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 15
        Text = '7500'
        OnMouseMove = P6MouseMove
      end
      object P7: TEdit
        Left = 89
        Top = 145
        Width = 62
        Height = 25
        Hint = #40664#35748#20540
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 16
        Text = '10000'
        OnMouseMove = P7MouseMove
      end
      object P8: TEdit
        Left = 89
        Top = 168
        Width = 62
        Height = 25
        Hint = #40664#35748#20540
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 17
        Text = '15000'
        OnMouseMove = P8MouseMove
      end
      object P9: TEdit
        Left = 89
        Top = 192
        Width = 62
        Height = 25
        Hint = #40664#35748#20540
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 18
        Text = '20000'
        OnMouseMove = P9MouseMove
      end
      object P10: TEdit
        Left = 89
        Top = 215
        Width = 62
        Height = 25
        Hint = #40664#35748#20540
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        ParentShowHint = False
        ShowHint = False
        TabOrder = 19
        Text = '25000'
        OnMouseMove = P10MouseMove
      end
    end
  end
  object Panel3: TPanel
    Left = 5
    Top = 39
    Width = 228
    Height = 292
    TabOrder = 3
    object Bevel2: TBevel
      Left = 5
      Top = 5
      Width = 89
      Height = 278
    end
    object Bevel1: TBevel
      Left = 99
      Top = 5
      Width = 121
      Height = 278
    end
    object Label59: TLabel
      Left = 25
      Top = 12
      Width = 37
      Height = 16
      Caption = #26657#20934#28857
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 125
      Top = 13
      Width = 61
      Height = 16
      Caption = #26657#20934#28857#36755#20837
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ListBox2: TListBox
      Left = 11
      Top = 32
      Width = 78
      Height = 244
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 24
      ParentFont = False
      TabOrder = 0
      OnClick = ListBox2Click
    end
    object Button1: TButton
      Left = 104
      Top = 80
      Width = 111
      Height = 32
      Caption = #25913#21464#26657#20934#28857
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
    object Edit4: TEdit
      Left = 105
      Top = 32
      Width = 109
      Height = 47
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -32
      Font.Name = 'Impact'
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      TabOrder = 2
      Text = '1000'
    end
    object Button10: TButton
      Left = 104
      Top = 113
      Width = 111
      Height = 32
      Caption = #38646#28857#35774#32622
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = Button10Click
    end
    object Button2: TButton
      Left = 104
      Top = 146
      Width = 111
      Height = 32
      Caption = #38745#24577#35774#32622
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
      OnClick = Button2Click
    end
    object Button4: TButton
      Left = 104
      Top = 180
      Width = 111
      Height = 31
      Caption = #21160#24577#35774#32622
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 5
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 104
      Top = 212
      Width = 111
      Height = 33
      Caption = #24320#22987#20449#21495
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 6
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 104
      Top = 246
      Width = 111
      Height = 32
      Caption = #32467#26463#20449#21495
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 7
      OnClick = Button6Click
    end
  end
  object Panel2: TPanel
    Left = 426
    Top = 44
    Width = 118
    Height = 278
    BevelOuter = bvLowered
    TabOrder = 0
    object Label3: TLabel
      Left = 30
      Top = 9
      Width = 49
      Height = 16
      Caption = #23454#26102#26174#31034
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Button25: TButton
      Left = 7
      Top = 141
      Width = 104
      Height = 34
      Caption = #32447#24615#21270
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = Button25Click
    end
    object Button26: TButton
      Left = 7
      Top = 176
      Width = 104
      Height = 33
      Caption = #31995#32479#21442#25968
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = Button26Click
    end
    object Button27: TButton
      Left = 7
      Top = 76
      Width = 104
      Height = 32
      Caption = #26657#20934#28857#30830#35748
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = Button27Click
    end
    object Button28: TButton
      Left = 7
      Top = 242
      Width = 104
      Height = 33
      Caption = #36864#20986
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = Button28Click
    end
    object Button7: TButton
      Left = 7
      Top = 209
      Width = 104
      Height = 32
      Caption = #31995#32479#22240#32032
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 4
      OnClick = Button7Click
    end
    object Rew: TButton
      Left = 7
      Top = 109
      Width = 104
      Height = 32
      Caption = #37325#20889#26657#20934#20540
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 5
      OnClick = RewClick
    end
  end
  object Edit2: TEdit
    Left = 432
    Top = 72
    Width = 105
    Height = 47
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'Impact'
    Font.Style = [fsBold]
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentFont = False
    ReadOnly = True
    TabOrder = 2
    Text = '1000'
  end
  object Panel4: TPanel
    Left = 6
    Top = 0
    Width = 544
    Height = 38
    TabOrder = 4
    object Label1: TLabel
      Left = 138
      Top = 7
      Width = 254
      Height = 29
      Alignment = taCenter
      Caption = 'DAW50'#26657#20934#21450#21442#25968#35774#32622
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -25
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 500
    OnTimer = Timer1Timer
    Left = 62
    Top = 8
  end
end