parsetup.dfm

关于手持机的LCD显示模块的设计LCD的显示固定为每行16个字符

object FormSetUp: TFormSetUp
  Left = 557
  Top = 239
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #21442#25968#35774#32622
  ClientHeight = 413
  ClientWidth = 339
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBarForMessage: TStatusBar
    Left = 0
    Top = 376
    Width = 339
    Height = 37
    Panels = <
      item
        Width = 180
      end
      item
        Width = 200
      end>
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 329
    Height = 369
    ActivePage = TabSheet1
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #20018#21475#35774#32622
      object gbCommSet: TGroupBox
        Left = 64
        Top = 50
        Width = 193
        Height = 247
        TabOrder = 0
        object lblComName: TLabel
          Left = 23
          Top = 46
          Width = 44
          Height = 19
          AutoSize = False
          Caption = #20018#21475#21495
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object lblBaudRate: TLabel
          Left = 23
          Top = 97
          Width = 44
          Height = 24
          AutoSize = False
          Caption = #27874#29305#29575
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object cbComName: TComboBox
          Left = 79
          Top = 42
          Width = 75
          Height = 21
          Style = csDropDownList
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ImeName = #32043#20809#25340#38899#36755#20837#27861
          ItemHeight = 13
          ItemIndex = 2
          ParentFont = False
          TabOrder = 0
          Text = 'COM3'
          Items.Strings = (
            'COM1'
            'COM2'
            'COM3'
            'COM4')
        end
        object cbBaudRate: TComboBox
          Left = 79
          Top = 93
          Width = 75
          Height = 21
          Style = csDropDownList
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ImeName = #32043#20809#25340#38899#36755#20837#27861
          ItemHeight = 13
          ItemIndex = 3
          ParentFont = False
          TabOrder = 1
          Text = '19200'
          Items.Strings = (
            '4800'
            '9600'
            '14400'
            '19200'
            '24000'
            '28800'
            '33600'
            '38400'
            '43200'
            '48000'
            '52800'
            '57600')
        end
        object BtnComOpen: TButton
          Left = 48
          Top = 176
          Width = 97
          Height = 41
          Caption = #25171#24320#20018#21475
          TabOrder = 2
          OnClick = BtnComOpenClick
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #35835#21345#22120#35774#32622
      ImageIndex = 1
      object GroupBox1: TGroupBox
        Left = 56
        Top = 16
        Width = 225
        Height = 321
        TabOrder = 0
        object GroupBox6: TGroupBox
          Left = 48
          Top = 24
          Width = 137
          Height = 57
          Caption = #22825#32447#24320#20851
          TabOrder = 0
          object RadioButAntOpen: TRadioButton
            Left = 16
            Top = 24
            Width = 49
            Height = 25
            Caption = #24320
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = RadioButAntOpenClick
          end
          object RadioButAntClose: TRadioButton
            Left = 80
            Top = 24
            Width = 41
            Height = 25
            Caption = #20851
            TabOrder = 1
            OnClick = RadioButAntCloseClick
          end
        end
        object GroupBox8: TGroupBox
          Left = 48
          Top = 96
          Width = 137
          Height = 57
          Caption = #33258#21160#23547#21345
          TabOrder = 1
          object RadioButAutoSearchOpen: TRadioButton
            Left = 16
            Top = 24
            Width = 49
            Height = 25
            Caption = #24320
            TabOrder = 0
            OnClick = RadioButAutoSearchOpenClick
          end
          object RadioButAutoSearchClose: TRadioButton
            Left = 80
            Top = 26
            Width = 49
            Height = 19
            Caption = #20851
            Checked = True
            TabOrder = 1
            TabStop = True
            OnClick = RadioButAutoSearchCloseClick
          end
        end
        object GroupBox7: TGroupBox
          Left = 48
          Top = 176
          Width = 137
          Height = 57
          Caption = #34562#40483#22120#25805#20316
          TabOrder = 2
          object RadioButSoundOpen: TRadioButton
            Left = 20
            Top = 27
            Width = 33
            Height = 25
            Caption = #24320
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = RadioButSoundOpenClick
          end
          object RadioButSoundClose: TRadioButton
            Left = 80
            Top = 24
            Width = 41
            Height = 28
            Caption = #20851
            TabOrder = 1
            OnClick = RadioButSoundCloseClick
          end
        end
        object GroupBox5: TGroupBox
          Left = 48
          Top = 256
          Width = 137
          Height = 57
          Caption = 'LED'#24320#20851
          TabOrder = 3
          object RadioButLEDON: TRadioButton
            Left = 24
            Top = 24
            Width = 33
            Height = 25
            Caption = #24320
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = RadioButLEDONClick
          end
          object RadioButLEDOff: TRadioButton
            Left = 80
            Top = 24
            Width = 33
            Height = 25
            Caption = #20851
            TabOrder = 1
            OnClick = RadioButLEDOffClick
          end
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'LED'#35774#32622
      ImageIndex = 2
      object GroupBox9: TGroupBox
        Left = 0
        Top = 24
        Width = 313
        Height = 305
        TabOrder = 0
        object EditLEDShowData: TEdit
          Left = 176
          Top = 136
          Width = 97
          Height = 21
          MaxLength = 8
          TabOrder = 0
          Text = '123'
          OnKeyPress = EditLEDShowDataKeyPress
        end
        object BtnResetLED: TButton
          Left = 128
          Top = 56
          Width = 65
          Height = 41
          Caption = #22797#20301
          TabOrder = 1
          OnClick = BtnResetLEDClick
        end
        object BtnLEDDisp: TButton
          Left = 48
          Top = 128
          Width = 105
          Height = 33
          Caption = 'LED'#26174#31034#25968#25454
          TabOrder = 2
          OnClick = BtnLEDDispClick
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'LCD'#35774#32622
      ImageIndex = 3
      object GroupBox3: TGroupBox
        Left = 24
        Top = 32
        Width = 273
        Height = 281
        TabOrder = 0
        object GroupBox2: TGroupBox
          Left = 16
          Top = 120
          Width = 249
          Height = 145
          Caption = #25968#25454#26174#31034
          TabOrder = 0
          object Label1: TLabel
            Left = 16
            Top = 32
            Width = 43
            Height = 13
            Caption = 'X'#22352#26631#65306
          end
          object Label2: TLabel
            Left = 144
            Top = 32
            Width = 43
            Height = 13
            Caption = 'Y'#22352#26631#65306
          end
          object EditLCDShowData: TEdit
            Left = 136
            Top = 69
            Width = 105
            Height = 28
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -16
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            MaxLength = 8
            ParentFont = False
            TabOrder = 0
            Text = '3132'
          end
          object EditXPos: TEdit
            Left = 64
            Top = 32
            Width = 33
            Height = 21
            TabOrder = 1
            Text = '00'
          end
          object EditYPos: TEdit
            Left = 192
            Top = 32
            Width = 33
            Height = 21
            TabOrder = 2
            Text = '01'
          end
          object BtnLCDDisp: TButton
            Left = 16
            Top = 64
            Width = 105
            Height = 41
            Caption = 'LCD'#26174#31034#25968#25454
            TabOrder = 3
            OnClick = BtnLCDDispClick
          end
        end
        object BtnLCDReset: TButton
          Left = 80
          Top = 48
          Width = 113
          Height = 41
          Caption = 'LCD'#22797#20301
          TabOrder = 1
          OnClick = BtnLCDResetClick
        end
      end
    end
    object TabSheet5: TTabSheet
      Caption = #22266#20214#20449#24687
      ImageIndex = 4
      object GroupBox4: TGroupBox
        Left = 56
        Top = 40
        Width = 225
        Height = 145
        Caption = #20135#21697#20449#24687
        TabOrder = 0
        object Label12: TLabel
          Left = 8
          Top = 24
          Width = 60
          Height = 13
          Caption = #35774#22791#22411#21495#65306
        end
        object Label13: TLabel
          Left = 8
          Top = 48
          Width = 60
          Height = 13
          Caption = #22266#20214#29256#26412#65306
        end
        object EditDevicePartNo: TEdit
          Left = 88
          Top = 24
          Width = 113
          Height = 21
          TabOrder = 0
        end
        object EditForShowHaardWareVerson: TEdit
          Left = 88
          Top = 48
          Width = 113
          Height = 21
          TabOrder = 1
        end
        object BtnReadDevice: TButton
          Left = 72
          Top = 88
          Width = 97
          Height = 49
          Caption = #35835#21462#20449#24687
          TabOrder = 2
          OnClick = BtnReadDeviceClick
        end
      end
    end
  end
end