⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit1.dfm

📁 公路站超载检测系统上位机软件系统源程序!
💻 DFM
📖 第 1 页 / 共 2 页
字号:
object ParForm: TParForm
  Left = 309
  Top = 145
  Width = 566
  Height = 361
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #26657#20934
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -10
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 233
    Top = 39
    Width = 317
    Height = 292
    TabOrder = 1
    object Bevel3: TBevel
      Left = 8
      Top = 5
      Width = 179
      Height = 278
    end
    object Label57: TLabel
      Left = 31
      Top = 14
      Width = 37
      Height = 16
      Caption = #27169#25311#20540
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label58: TLabel
      Left = 117
      Top = 14
      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 ListBox1: TListBox
      Left = 333
      Top = 72
      Width = 165
      Height = 244
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 24
      Items.Strings = (
        ' 1000         1000'
        ' 2000         2000'
        ' 3000         3000'
        ' 4000         4000'
        ' 5000         5000'
        ' 7500         7500'
        '10000       10000'
        '15000       15000'
        '20000       20000'
        '25000       25000')
      ParentFont = False
      TabOrder = 0
      OnClick = ListBox1Click
    end
    object AnalogList: TListBox
      Left = 16
      Top = 32
      Width = 74
      Height = 244
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 24
      ParentFont = False
      TabOrder = 2
      OnClick = AnalogListClick
    end
    object PunkList: TListBox
      Left = 104
      Top = 32
      Width = 74
      Height = 244
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 24
      ParentFont = False
      TabOrder = 1
      OnClick = PunkListClick
    end
    object DataPad: TPanel
      Left = 17
      Top = 32
      Width = 160
      Height = 244
      TabOrder = 3
      object A1: TEdit
        Left = 11
        Top = 6
        Width = 63
        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 = 0
        Text = '493'
        OnMouseMove = A1MouseMove
      end
      object A2: TEdit
        Left = 11
        Top = 29
        Width = 63
        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 = 1
        Text = '986'
        OnMouseMove = A2MouseMove
      end
      object A3: TEdit
        Left = 11
        Top = 52
        Width = 63
        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 = 2
        Text = '1479'
        OnMouseMove = A3MouseMove
      end
      object A4: TEdit
        Left = 11
        Top = 76
        Width = 63
        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 = 3
        Text = '1972'
        OnMouseMove = A4MouseMove
      end
      object A5: TEdit
        Left = 11
        Top = 98
        Width = 63
        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 = 4
        Text = '2465'
        OnMouseMove = A5MouseMove
      end
      object A6: TEdit
        Left = 11
        Top = 122
        Width = 63
        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 = 5
        Text = '3698'
        OnMouseMove = A6MouseMove
      end
      object A7: TEdit
        Left = 11
        Top = 145
        Width = 63
        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 = 6
        Text = '6163'
        OnMouseMove = A7MouseMove
      end
      object A8: TEdit
        Left = 11
        Top = 168
        Width = 63
        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 = 7
        Text = '7395'
        OnMouseMove = A8MouseMove
      end
      object A9: TEdit
        Left = 11
        Top = 191
        Width = 63
        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 = 8
        Text = '9860'
        OnMouseMove = A9MouseMove
      end
      object A10: TEdit
        Left = 11
        Top = 215
        Width = 63
        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 = 9
        Text = '12325'
        OnMouseMove = A10MouseMove
      end
      object P1: TEdit
        Left = 89
        Top = 7
        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 = 10
        Text = '1000'
        OnMouseMove = P1MouseMove
      end
      object P2: TEdit
        Left = 89
        Top = 29
        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 = 11
        Text = '2000'
        OnMouseMove = P2MouseMove
      end
      object P3: TEdit
        Left = 89
        Top = 53
        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 = 12
        Text = '3000'
        OnMouseMove = P3MouseMove
      end
      object P4: TEdit
        Left = 89
        Top = 76
        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 = 13
        Text = '4000'
        OnMouseMove = P4MouseMove
      end
      object P5: TEdit
        Left = 89
        Top = 99
        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 = 14
        Text = '5000'
        OnMouseMove = P5MouseMove
      end
      object P6: TEdit
        Left = 89
        Top = 122
        Width = 62
        Height = 25
        Hint = #40664#35748#20540

⌨️ 快捷键说明

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