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

📄 unit1.dfm

📁 32位数字式光纤陀螺的采集程序
💻 DFM
字号:
object Form1: TForm1
  Left = 288
  Top = 141
  Width = 294
  Height = 476
  Caption = #20256#24863#22120#26631#23450
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 286
    Height = 442
    ActivePage = TabSheet2
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet2: TTabSheet
      Caption = #27979#35797#25968#25454
      ImageIndex = 1
      object Label20: TLabel
        Left = 152
        Top = 228
        Width = 73
        Height = 15
        AutoSize = False
        Caption = #25968#25454#39057#29575':'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label21: TLabel
        Left = 245
        Top = 260
        Width = 20
        Height = 21
        AutoSize = False
        Caption = 'Hz'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Panel1: TPanel
        Left = 1
        Top = 8
        Width = 184
        Height = 33
        HelpType = htKeyword
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Caption = '2005-4-1  00:00:00'
        Color = clBlack
        Font.Charset = ANSI_CHARSET
        Font.Color = clAqua
        Font.Height = -16
        Font.Name = 'Times New Roman MT Extra Bold'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 274
        Width = 137
        Height = 135
        Caption = #38464#34746#25968#25454
        TabOrder = 1
        object Label14: TLabel
          Left = 5
          Top = 31
          Width = 25
          Height = 15
          AutoSize = False
          Caption = '1:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label15: TLabel
          Left = 5
          Top = 70
          Width = 25
          Height = 15
          AutoSize = False
          Caption = '2:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label16: TLabel
          Left = 5
          Top = 108
          Width = 25
          Height = 15
          AutoSize = False
          Caption = '3:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object T_tuoluo_1: TEdit
          Left = 18
          Top = 27
          Width = 100
          Height = 22
          AutoSize = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ReadOnly = True
          TabOrder = 0
        end
        object T_tuoluo_2: TEdit
          Left = 18
          Top = 66
          Width = 100
          Height = 21
          AutoSize = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ReadOnly = True
          TabOrder = 1
        end
        object T_tuoluo_3: TEdit
          Left = 18
          Top = 104
          Width = 100
          Height = 22
          AutoSize = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ReadOnly = True
          TabOrder = 2
        end
      end
      object Panel2: TPanel
        Left = 153
        Top = 124
        Width = 88
        Height = 29
        HelpType = htKeyword
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Caption = ' 00:00:00'
        Color = clBlack
        Font.Charset = ANSI_CHARSET
        Font.Color = clAqua
        Font.Height = -16
        Font.Name = 'Times New Roman MT Extra Bold'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object Button4: TButton
        Left = 158
        Top = 168
        Width = 75
        Height = 25
        Caption = #24320#22987
        TabOrder = 3
        OnClick = Button4Click
      end
      object GroupBox6: TGroupBox
        Left = 8
        Top = 48
        Width = 129
        Height = 217
        Caption = #20449#24687
        TabOrder = 4
        object ListBox1: TListBox
          Left = 8
          Top = 16
          Width = 113
          Height = 193
          ItemHeight = 12
          TabOrder = 0
        end
      end
      object MSComm1: TMSComm
        Left = 208
        Top = 8
        Width = 32
        Height = 32
        OnComm = MSComm1Comm
        ControlData = {
          2143341208000000ED030000ED03000001568A64000006000000010000040000
          00020000802500000000080000000000000000003F00000001000000}
      end
      object Edit7: TEdit
        Left = 168
        Top = 256
        Width = 65
        Height = 22
        AutoSize = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ReadOnly = True
        TabOrder = 6
      end
      object GroupBox10: TGroupBox
        Left = 152
        Top = 48
        Width = 121
        Height = 65
        Caption = #20018#21475#36890#36947
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 7
        object Button7: TButton
          Left = 16
          Top = 24
          Width = 89
          Height = 25
          Caption = #25171#24320#20018#21475'0'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnClick = Button7Click
        end
      end
      object Button13: TButton
        Left = 158
        Top = 200
        Width = 75
        Height = 25
        Caption = #26242#20572
        Enabled = False
        TabOrder = 8
        OnClick = Button13Click
      end
    end
    object TabSheet3: TTabSheet
      Caption = #20018#21475#35774#32622
      ImageIndex = 2
      object GroupBox7: TGroupBox
        Left = 8
        Top = 8
        Width = 169
        Height = 129
        Caption = #20018#21475#35774#32622
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        object Label25: TLabel
          Left = 8
          Top = 40
          Width = 41
          Height = 16
          AutoSize = False
          Caption = #31471#21475#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label26: TLabel
          Left = 8
          Top = 88
          Width = 57
          Height = 16
          AutoSize = False
          Caption = #27874#29305#29575#65306
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label27: TLabel
          Left = 136
          Top = 85
          Width = 25
          Height = 16
          AutoSize = False
          Caption = 'BPS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object CB_COM_NO: TComboBox
          Left = 80
          Top = 32
          Width = 49
          Height = 24
          Style = csDropDownList
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ItemIndex = 0
          ParentFont = False
          TabOrder = 0
          Text = '1'
          Items.Strings = (
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7'
            '8'
            '9')
        end
        object CB_COM_BPS: TComboBox
          Left = 64
          Top = 80
          Width = 65
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ItemIndex = 8
          ParentFont = False
          TabOrder = 1
          Text = '38400'
          Items.Strings = (
            '300'
            '600'
            '1200'
            '2400'
            '4800'
            '9600'
            '14400'
            '19200'
            '38400'
            '57600'
            '115200'
            '128000')
        end
      end
    end
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 288
    Top = 32
  end
  object Timer2: TTimer
    OnTimer = Timer2Timer
    Left = 256
    Top = 32
  end
end

⌨️ 快捷键说明

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