parserfm.~dfm

DELPHI 串口程序 小程序 我个人做的想程序给大家看看

object ParserForm: TParserForm
  Left = 215
  Top = 105
  BiDiMode = bdRightToLeft
  BorderStyle = bsSingle
  Caption = #21333#35789#35299#26512#22120
  ClientHeight = 281
  ClientWidth = 505
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  ParentBiDiMode = False
  OnClick = BtnAddClick
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 377
    Height = 17
    AutoSize = False
    Caption = #35831#22312#19979#38754#30340#36755#20837#26694#37324#36755#20837#33521#25991#21333#35789#24207#21015','#19981#35201#36755#20837#26631#28857
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 63
    Width = 135
    Height = 50
    AutoSize = False
    Caption = #35831#22312#19979#38754#30340#36755#20837#26694#37324#36755#20837#35201#28155#21152#30340#25110#32773#26597#25214#30340#21333#35789' '
    DragMode = dmAutomatic
    FocusControl = BtnAddWord
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object EdtInput: TEdit
    Left = 0
    Top = 31
    Width = 505
    Height = 21
    TabOrder = 0
  end
  object LBWords: TListBox
    Left = 264
    Top = 63
    Width = 121
    Height = 177
    ItemHeight = 13
    TabOrder = 1
  end
  object BtnAddWord: TBitBtn
    Left = 160
    Top = 63
    Width = 75
    Height = 25
    Caption = #28155#21152#21333#35789
    TabOrder = 2
    OnClick = BtnAddWordClick
  end
  object BtnFindAdd: TBitBtn
    Left = 160
    Top = 95
    Width = 75
    Height = 25
    Caption = #26597#25214#21333#35789
    TabOrder = 3
    OnClick = BtnFindAddClick
  end
  object BtnDellWord: TBitBtn
    Left = 160
    Top = 127
    Width = 75
    Height = 25
    Caption = #21024#38500#21333#35789
    TabOrder = 4
    OnClick = BtnDellWordClick
  end
  object BtnSort: TBitBtn
    Left = 160
    Top = 159
    Width = 75
    Height = 25
    Caption = #25490#24207
    TabOrder = 5
    OnClick = BtnSortClick
  end
  object BtnClearAll: TBitBtn
    Left = 160
    Top = 191
    Width = 75
    Height = 25
    Caption = #28165#31354
    TabOrder = 6
    OnClick = BtnClearAllClick
  end
  object EdtInputWord: TEdit
    Left = 8
    Top = 119
    Width = 121
    Height = 21
    TabOrder = 7
  end
  object StaticText1: TStaticText
    Left = 80
    Top = 256
    Width = 4
    Height = 4
    TabOrder = 8
  end
  object RGSort: TRadioGroup
    Left = 16
    Top = 160
    Width = 105
    Height = 105
    Caption = #26159#21542#25490#24207
    Items.Strings = (
      #25490#24207
      #19981#25490#24207)
    TabOrder = 9
  end
  object BtnAdd: TBitBtn
    Left = 400
    Top = 80
    Width = 75
    Height = 73
    Caption = #28155#21152
    TabOrder = 10
    OnClick = BtnAddClick
  end
  object XPManifest1: TXPManifest
    Left = 152
    Top = 248
  end
end