find1.dfm

这是我一时兴起现学现用的一个求单片机波特率的小程序！ 选中"做何运算"后双击一次选中内容

  OldCreateOrder = False
  Position = poDefaultPosOnly
  Visible = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 24
    Top = 48
    Width = 129
    Height = 13
    AutoSize = False
    Caption = '1'#12289#30001#39057#29575#27714#27874#29305#29575#65306
  end
  object Label2: TLabel
    Left = 24
    Top = 136
    Width = 113
    Height = 13
    AutoSize = False
    BiDiMode = bdLeftToRight
    Caption = '2'#12289#30001#27874#29305#29575#27714#39057#29575
    ParentBiDiMode = False
  end
  object Label3: TLabel
    Left = 24
    Top = 216
    Width = 249
    Height = 13
    AutoSize = False
    Caption = '3'#12289#30001'2'#20010#39057#29575#27714#27874#29305#29575#30456#21516#26102#30340'THTL'
  end
  object Label5: TLabel
    Left = 48
    Top = 232
    Width = 41
    Height = 20
    Caption = 'Fos1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 48
    Top = 264
    Width = 41
    Height = 20
    Caption = 'Fos2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label7: TLabel
    Left = 200
    Top = 240
    Width = 37
    Height = 20
    Caption = 'MHz'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label9: TLabel
    Left = 192
    Top = 8
    Width = 57
    Height = 13
    AutoSize = False
    Caption = #20018#21475#26041#24335
  end
  object Label10: TLabel
    Left = 48
    Top = 72
    Width = 52
    Height = 16
    Caption = #39057#29575#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label11: TLabel
    Left = 208
    Top = 72
    Width = 37
    Height = 20
    Caption = 'MHz'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label12: TLabel
    Left = 48
    Top = 104
    Width = 73
    Height = 13
    AutoSize = False
    Caption = #27874#29305#29575#33539#22260#65306
  end
  object Label13: TLabel
    Left = 192
    Top = 112
    Width = 11
    Height = 13
    Caption = #21040
  end
  object Label14: TLabel
    Left = 48
    Top = 160
    Width = 68
    Height = 19
    Caption = #27874#29305#29575#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label15: TLabel
    Left = 64
    Top = 192
    Width = 73
    Height = 13
    AutoSize = False
    Caption = #39057#29575#33539#22260#65306
  end
  object Label16: TLabel
    Left = 200
    Top = 192
    Width = 11
    Height = 13
    Caption = #21040
  end
  object Label17: TLabel
    Left = 288
    Top = 184
    Width = 37
    Height = 20
    Caption = 'MHz'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label19: TLabel
    Left = 24
    Top = 8
    Width = 129
    Height = 13
    AutoSize = False
    Caption = #20570#20309#36816#31639
  end
  object Label8: TLabel
    Left = 200
    Top = 264
    Width = 89
    Height = 13
    AutoSize = False
    Caption = #35823#24046#20026'2'#20197#20869
  end
  object btexit: TButton
    Left = 216
    Top = 312
    Width = 97
    Height = 25
    Cursor = crHandPoint
    Caption = #36864#20986#31243#24207
    TabOrder = 0
    OnClick = btexitClick
  end
  object disp: TMemo
    Left = 328
    Top = 16
    Width = 201
    Height = 321
    ScrollBars = ssVertical
    TabOrder = 1
  end
  object ComboBox1: TComboBox
    Left = 256
    Top = 24
    Width = 65
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    Text = 'smod=0'
    Items.Strings = (
      'smod=0'
      'smod=1')
  end
  object ComboBox2: TComboBox
    Left = 192
    Top = 24
    Width = 49
    Height = 21
    ItemHeight = 13
    TabOrder = 3
    Text = '1'
    Items.Strings = (
      '0'
      '1'
      '2'
      '3')
  end
  object Button3: TButton
    Left = 24
    Top = 312
    Width = 177
    Height = 25
    Caption = #24320#22987#26597#25214#65288'search now'#65289
    TabOrder = 4
    OnClick = Button3Click
  end
  object ComBox: TComboBox
    Left = 24
    Top = 24
    Width = 161
    Height = 21
    ItemHeight = 13
    TabOrder = 5
    Text = '1'#12289#30001#39057#29575#27714#27874#29305#29575
    OnDblClick = ComBoxDblClick
    Items.Strings = (
      '1'#12289#30001#39057#29575#27714#27874#29305#29575
      '2'#12289#30001#27874#29305#29575#27714#39057#29575
      '3'#12289#30001'2'#20010#39057#29575#27714#27874#29305#29575#30456#21516#30340'THTHL')
  end
  object one1: TMaskEdit
    Left = 120
    Top = 72
    Width = 68
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 6
    Text = '11.0592 '
  end
  object one3: TMaskEdit
    Left = 216
    Top = 104
    Width = 57
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 7
    Text = '9600    '
  end
  object two1: TMaskEdit
    Left = 112
    Top = 160
    Width = 79
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 8
    Text = '9600    '
  end
  object two2: TMaskEdit
    Left = 128
    Top = 184
    Width = 65
    Height = 21
    Color = 4227200
    EditMask = 'ccccccccc;1;_'
    MaxLength = 9
    TabOrder = 9
    Text = '0        '
  end
  object two3: TMaskEdit
    Left = 216
    Top = 184
    Width = 65
    Height = 21
    Color = 4227200
    EditMask = 'ccccccccc;1;_'
    MaxLength = 9
    TabOrder = 10
    Text = '18.432   '
  end
  object three1: TMaskEdit
    Left = 112
    Top = 232
    Width = 73
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 11
    Text = '18.432  '
  end
  object three2: TMaskEdit
    Left = 112
    Top = 264
    Width = 73
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 12
    Text = '36.87   '
  end
  object one2: TMaskEdit
    Left = 128
    Top = 104
    Width = 65
    Height = 21
    Color = 4227200
    EditMask = 'cccccccc;1;_'
    MaxLength = 8
    TabOrder = 13
    Text = '0       '
  end
end