unitmainform.dfm

串口短信猫收发软件。支持西门子TC35i设备

    object BtnNewsgroups: TRzToolButton
      Left = 120
      Top = 2
      Hint = #30701#20449#32676#21457
      DisabledIndex = 17
      ImageIndex = 1
      Action = Action_SendSMS
      ParentShowHint = False
      ShowHint = True
    end
    object BtnView: TRzToolButton
      Left = 145
      Top = 2
      Hint = #26597#35810#32479#35745
      DisabledIndex = 19
      ImageIndex = 18
      Action = Action_QuerySMS
      ParentShowHint = False
      ShowHint = True
    end
    object RzSpacer3: TRzSpacer
      Left = 170
      Top = 2
    end
    object BtnInformation: TRzToolButton
      Left = 178
      Top = 2
      Hint = #20851#20110
      DisabledIndex = 23
      ImageIndex = 22
      Action = Action_About
      ParentShowHint = False
      ShowHint = True
    end
    object BtnExit: TRzToolButton
      Left = 211
      Top = 2
      Hint = #36864#20986#31995#32479
      DisabledIndex = 25
      ImageIndex = 24
      Action = Action_Exit
      ParentShowHint = False
      ShowHint = True
    end
    object RzSpacer4: TRzSpacer
      Left = 203
      Top = 2
    end
  end
  object RzPageControl1: TRzPageControl
    Left = 0
    Top = 29
    Width = 742
    Height = 456
    ActivePage = TabSheetComm
    ActivePageDefault = TabSheetComm
    DblClickUndocks = False
    Align = alClient
    AlignTabs = True
    BackgroundColor = clBtnFace
    BoldCurrentTab = True
    Color = clSkyBlue
    UseColoredTabs = True
    FlatColor = clBtnFace
    ImagePosition = ipTop
    Images = ImageList1
    ParentBackgroundColor = False
    ParentColor = False
    ParentShowHint = False
    ShowCardFrame = False
    ShowFocusRect = False
    ShowFullFrame = False
    ShowHint = False
    ShowShadow = False
    TextOrientation = orVertical
    TabColors.HighlightBar = clLime
    TabColors.Shadow = clSkyBlue
    TabColors.Unselected = clSkyBlue
    TabHints = True
    TabIndex = 0
    TabOrder = 2
    TabOrientation = toRight
    TabStyle = tsDoubleSlant
    TabWidth = 18
    FixedDimension = 18
    object TabSheetComm: TRzTabSheet
      Hint = #36890#35759#29366#24577
      Color = clSkyBlue
      ImageIndex = 26
      Caption = #36890#35759#29366#24577
      ParentShowHint = False
      ShowHint = True
      object ListViewCommStat: TListView
        Left = 0
        Top = 343
        Width = 724
        Height = 113
        Align = alBottom
        Color = clBlack
        Columns = <
          item
            Width = 2
          end
          item
            Caption = #31471#21475
            Width = 38
          end
          item
            Caption = '          '#36890#35759#35774#22791#22411#21495
            Width = 200
          end
          item
            Alignment = taCenter
            Caption = #29366#24577
            Width = 40
          end
          item
            Alignment = taCenter
            Caption = #30005#20449#36816#33829#21830
            Width = 72
          end
          item
            Caption = '   SIM'#21345#24207#21015#21495
            Width = 115
          end
          item
            Caption = '  '#26381#21153#20013#24515#22320#22336
            Width = 105
          end
          item
            Caption = '   '#32593#32476#20449#21495#24378#24230
            Width = 120
          end>
        Font.Charset = GB2312_CHARSET
        Font.Color = clLime
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        HideSelection = False
        HotTrack = True
        HotTrackStyles = [htHandPoint]
        ReadOnly = True
        ParentFont = False
        ParentShowHint = False
        ShowWorkAreas = True
        ShowHint = False
        TabOrder = 0
        ViewStyle = vsReport
        OnCustomDrawItem = ListViewCommStatCustomDrawItem
      end
      object StringGridListAll: TStringGrid
        Left = 0
        Top = 0
        Width = 724
        Height = 343
        Hint = #36816#34892#20449#24687#26174#31034
        Align = alClient
        Color = clInfoBk
        ColCount = 4
        DefaultColWidth = 45
        DefaultRowHeight = 16
        RowCount = 20
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing, goColSizing, goRowSelect]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        ColWidths = (
          40
          43
          57
          575)
      end
    end
    object TabSheetSendSMS: TRzTabSheet
      Hint = #21457#36865#30701#20449
      Color = clSkyBlue
      ImageIndex = 27
      Caption = #21457#36865#30701#20449
      ParentShowHint = False
      ShowHint = True
      object ListViewSendLog: TRzListView
        Left = 0
        Top = 0
        Width = 724
        Height = 456
        Hint = #21452#20987#21457#30701#20449'...'
        Align = alClient
        Anchors = [akLeft, akTop, akBottom]
        Columns = <
          item
            Width = 2
          end
          item
            Caption = #36890#35759#31471#21475
            Width = 60
          end
          item
            Alignment = taCenter
            Caption = #32034#24341#21495
          end
          item
            Caption = '     '#21457#36865#21495#30721
            Width = 120
          end
          item
            Caption = '      '#21457#36865#26102#38388
            Width = 140
          end
          item
            Caption = #30701#20449#20869#23481
            Width = 332
          end>
        FlatScrollBars = True
        FrameHotTrack = True
        FrameHotStyle = fsLowered
        FrameVisible = True
        HideSelection = False
        ParentShowHint = False
        ReadOnly = True
        RowSelect = True
        ShowHint = True
        TabOrder = 0
        ViewStyle = vsReport
        OnDblClick = ListViewSendLogDblClick
      end
    end
    object TabSheetRecieveSMS: TRzTabSheet
      Hint = #25509#25910#30701#20449
      Color = clSkyBlue
      ImageIndex = 1
      Caption = #25509#25910#30701#20449
      ParentShowHint = False
      ShowHint = True
      object ListViewReceiveLog: TRzListView
        Left = 0
        Top = 0
        Width = 724
        Height = 456
        Hint = #21452#20987#21457#30701#20449'...'
        Align = alClient
        Anchors = [akLeft, akTop, akBottom]
        Columns = <
          item
            Width = 2
          end
          item
            Caption = #36890#35759#31471#21475
            Width = 60
          end
          item
            Alignment = taCenter
            Caption = #32034#24341#21495
          end
          item
            Caption = '     '#26469#20449#21495#30721
            Width = 120
          end
          item
            Caption = '      '#26469#20449#26102#38388
            Width = 140
          end
          item
            Caption = #30701#20449#20869#23481
            Width = 332
          end>
        FlatScrollBars = True
        FrameHotTrack = True
        FrameHotStyle = fsLowered
        FrameVisible = True
        HideSelection = False
        ReadOnly = True
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
        OnDblClick = ListViewReceiveLogDblClick
      end
    end
    object TabSheetDebug: TRzTabSheet
      Hint = #35843#35797#31383#21475
      Color = clSkyBlue
      ImageIndex = 29
      Caption = #35843#35797#31383#21475
      ParentShowHint = False
      ShowHint = True
      object Panel3: TPanel
        Left = 0
        Top = 421
        Width = 724