unit1.~dfm

pdu编码的软件源代码

    object LMDRadioButton7: TLMDRadioButton
      Left = 40
      Top = 66
      Width = 124
      Height = 17
      Alignment.Spacing = 4
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Caption = 'none(from AT+CSCA)'
      Checked = False
      GlyphFlat = True
      TabOrder = 4
      OnClick = LMDRadioButton7Click
    end
    object LMDEdit5: TLMDEdit
      Left = 168
      Top = 21
      Width = 100
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Flat = True
      TabOrder = 5
      CustomButtons = <>
      PasswordChar = #0
      ReadOnly = True
      Text = '654987123258'
    end
    object LMDEdit6: TLMDEdit
      Left = 168
      Top = 59
      Width = 100
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 6
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
    end
  end
  object GroupBox2: TGroupBox
    Left = 137
    Top = 98
    Width = 281
    Height = 73
    Caption = 'Destation Address'
    TabOrder = 7
    object Label1: TLabel
      Left = 40
      Top = 16
      Width = 26
      Height = 13
      Caption = 'Digits'
    end
    object LMDEdit7: TLMDEdit
      Left = 8
      Top = 16
      Width = 25
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 0
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
      ReadOnly = True
    end
    object LMDEdit8: TLMDEdit
      Left = 8
      Top = 48
      Width = 25
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
      ReadOnly = True
    end
    object LMDRadioButton8: TLMDRadioButton
      Left = 73
      Top = 19
      Width = 64
      Height = 17
      Alignment.Spacing = 4
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Caption = 'National'
      Checked = False
      GlyphFlat = True
      TabOrder = 2
      OnClick = LMDRadioButton8Click
    end
    object LMDRadioButton9: TLMDRadioButton
      Left = 73
      Top = 47
      Width = 82
      Height = 17
      Alignment.Spacing = 4
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Caption = 'International'
      Checked = False
      GlyphFlat = True
      TabOrder = 3
      OnClick = LMDRadioButton9Click
    end
    object LMDEdit9: TLMDEdit
      Left = 168
      Top = 14
      Width = 100
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Flat = True
      TabOrder = 4
      CustomButtons = <>
      PasswordChar = #0
      Text = '0123456789'
    end
    object LMDEdit10: TLMDEdit
      Left = 168
      Top = 44
      Width = 100
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 5
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
    end
  end
  object GroupBox3: TGroupBox
    Left = 138
    Top = 174
    Width = 281
    Height = 73
    Caption = 'Data Coding Scheme'
    TabOrder = 8
    object LMDEdit11: TLMDEdit
      Left = 6
      Top = 28
      Width = 27
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 0
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
    end
    object LMDRadioButton10: TLMDRadioButton
      Left = 48
      Top = 22
      Width = 44
      Height = 17
      Alignment.Spacing = 4
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Caption = '7-bit'
      Checked = False
      GlyphFlat = True
      TabOrder = 1
    end
    object LMDRadioButton11: TLMDRadioButton
      Left = 48
      Top = 44
      Width = 43
      Height = 17
      Alignment.Spacing = 4
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Caption = '8-bit'
      Checked = False
      GlyphFlat = True
      TabOrder = 2
    end
    object GroupBox4: TGroupBox
      Left = 120
      Top = 11
      Width = 147
      Height = 53
      Caption = 'Message Class'
      TabOrder = 3
      object LMDRadioButton12: TLMDRadioButton
        Left = 9
        Top = 16
        Width = 56
        Height = 17
        Alignment.Spacing = 4
        BackFX.AlphaBlend.Strength = 0.600000023841858
        BackFX.AlphaBlend.FillObject.Style = sfNone
        Caption = 'Class-0'
        Checked = False
        GlyphFlat = True
        TabOrder = 0
        OnClick = LMDRadioButton12Click
      end
      object LMDRadioButton13: TLMDRadioButton
        Left = 9
        Top = 33
        Width = 57
        Height = 17
        Alignment.Spacing = 4
        BackFX.AlphaBlend.Strength = 0.600000023841858
        BackFX.AlphaBlend.FillObject.Style = sfNone
        Caption = 'Class-1'
        Checked = False
        GlyphFlat = True
        TabOrder = 1
        OnClick = LMDRadioButton13Click
      end
      object LMDRadioButton14: TLMDRadioButton
        Left = 75
        Top = 16
        Width = 65
        Height = 17
        Alignment.Spacing = 4
        BackFX.AlphaBlend.Strength = 0.600000023841858
        BackFX.AlphaBlend.FillObject.Style = sfNone
        Caption = 'Class-2'
        Checked = False
        GlyphFlat = True
        TabOrder = 2
        OnClick = LMDRadioButton14Click
      end
      object LMDRadioButton15: TLMDRadioButton
        Left = 75
        Top = 34
        Width = 58
        Height = 17
        Alignment.Spacing = 4
        BackFX.AlphaBlend.Strength = 0.600000023841858
        BackFX.AlphaBlend.FillObject.Style = sfNone
        Caption = 'Class-3'
        Checked = False
        GlyphFlat = True
        TabOrder = 3
        OnClick = LMDRadioButton15Click
      end
    end
  end
  object GroupBox5: TGroupBox
    Left = 137
    Top = 249
    Width = 281
    Height = 60
    Caption = 'User Data'
    TabOrder = 9
    object Label2: TLabel
      Left = 10
      Top = 27
      Width = 33
      Height = 13
      AutoSize = False
    end
    object Memo1: TMemo
      Left = 53
      Top = 12
      Width = 222
      Height = 41
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object LMDEdit15: TLMDEdit
      Left = 8
      Top = 24
      Width = 25
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
      Text = '00'
    end
  end
  object GroupBox6: TGroupBox
    Left = 137
    Top = 312
    Width = 281
    Height = 73
    Caption = 'PDU-Code'
    TabOrder = 10
    object Memo2: TMemo
      Left = 7
      Top = 16
      Width = 268
      Height = 48
      Color = 10251325
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 0
    end
  end
  object GroupBox7: TGroupBox
    Left = 8
    Top = 258
    Width = 121
    Height = 57
    Caption = ' validity period0..255'
    TabOrder = 11
    object Label3: TLabel
      Left = 8
      Top = 24
      Width = 25
      Height = 17
      AutoSize = False
      Caption = 'vp:'
    end
    object LMDEdit12: TLMDEdit
      Left = 34
      Top = 22
      Width = 26
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 0
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
      ReadOnly = True
      Text = '167'
    end
    object LMDEdit13: TLMDEdit
      Left = 78
      Top = 23
      Width = 31
      Height = 21
      Cursor = crIBeam
      BackFX.AlphaBlend.Strength = 0.600000023841858
      BackFX.AlphaBlend.FillObject.Style = sfNone
      Bevel.Mode = bmWindows
      Bevel.StandardStyle = lsSingleLowered
      Caret.BlinkRate = 530
      Caret.ImageIndex = 0
      Caret.ListIndex = 0
      Color = 10251325
      Flat = True
      TabOrder = 1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      CustomButtons = <>
      PasswordChar = #0
      ReadOnly = True
      Text = 'A7'
    end
  end
end