netmonitorform.dfm

自已写的IP扫描工具

        end
      end
      object Panel2: TPanel
        Left = 0
        Top = 103
        Width = 753
        Height = 401
        Align = alClient
        TabOrder = 1
        object Panel3: TPanel
          Left = 1
          Top = 1
          Width = 224
          Height = 399
          Align = alLeft
          TabOrder = 0
          object Panel5: TPanel
            Left = 1
            Top = 340
            Width = 222
            Height = 58
            Align = alBottom
            TabOrder = 0
            object btnInIPChooseAll: TButton
              Left = 16
              Top = 24
              Width = 58
              Height = 25
              Caption = #20840#36984
              TabOrder = 0
              OnClick = btnInIPChooseAllClick
            end
            object btnInIPChooseCancel: TButton
              Left = 82
              Top = 24
              Width = 58
              Height = 25
              Caption = #21462#28040
              TabOrder = 1
              OnClick = btnInIPChooseCancelClick
            end
            object btnInIPSaveState: TButton
              Left = 149
              Top = 24
              Width = 58
              Height = 25
              Caption = #20445#23384
              TabOrder = 2
              OnClick = btnInIPSaveStateClick
            end
          end
          object gsInIPList: TGroupBox
            Left = 1
            Top = 57
            Width = 216
            Height = 299
            Caption = 'ping'#20837'IP'#22320#22336#21015#34920
            TabOrder = 1
            object chklstInIPLocal: TCheckListBox
              Left = 2
              Top = 15
              Width = 212
              Height = 282
              Align = alClient
              Ctl3D = False
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #26032#32048#26126#39636
              Font.Style = []
              ItemHeight = 13
              ParentCtl3D = False
              ParentFont = False
              Style = lbOwnerDrawVariable
              TabOrder = 0
              OnDrawItem = chklstInIPLocalDrawItem
            end
          end
          object pnl3: TPanel
            Left = 1
            Top = 1
            Width = 222
            Height = 45
            Align = alTop
            BevelInner = bvRaised
            BevelOuter = bvNone
            Ctl3D = True
            ParentCtl3D = False
            TabOrder = 2
            object Shape: TShape
              Left = 32
              Top = 4
              Width = 37
              Height = 36
              Enabled = False
              Pen.Style = psInsideFrame
              Pen.Width = 3
              Shape = stEllipse
            end
            object lblshowmessage: TLabel
              Left = 88
              Top = 9
              Width = 82
              Height = 26
              AutoSize = False
              Color = clBtnFace
              Font.Charset = DEFAULT_CHARSET
              Font.Color = -1
              Font.Height = -16
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentColor = False
              ParentFont = False
            end
          end
        end
        object Panel4: TPanel
          Left = 225
          Top = 1
          Width = 527
          Height = 399
          Align = alClient
          BevelWidth = 2
          Caption = 'Panel4'
          TabOrder = 1
          object grpPingDataDesc: TGroupBox
            Left = 2
            Top = 2
            Width = 523
            Height = 395
            Align = alClient
            Caption = 'ping'#25976#25818#25551#36848
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 0
            object grp1: TGroupBox
              Left = 1
              Top = 209
              Width = 521
              Height = 185
              Align = alBottom
              Caption = 'Request Timed Out'
              TabOrder = 0
              object lstPingFail: TListBox
                Left = 1
                Top = 14
                Width = 519
                Height = 170
                Align = alClient
                Color = clWindowFrame
                Ctl3D = True
                Font.Charset = ANSI_CHARSET
                Font.Color = clWhite
                Font.Height = -13
                Font.Name = #26032#32048#26126#39636
                Font.Style = []
                ItemHeight = 13
                ParentCtl3D = False
                ParentFont = False
                TabOrder = 0
              end
              object MediaPlayer: TMediaPlayer
                Left = 16
                Top = 127
                Width = 253
                Height = 30
                TabOrder = 1
              end
              object btnChoose: TButton
                Left = 382
                Top = 143
                Width = 51
                Height = 25
                Caption = #32882#38899
                TabOrder = 2
                OnClick = btnChooseClick
              end
              object btnClearMemo: TButton
                Left = 440
                Top = 143
                Width = 55
                Height = 25
                Caption = #28165#31354
                TabOrder = 3
                OnClick = btnClearMemoClick
              end
              object agnt1: TAgent
                Left = 304
                Top = 128
                Width = 32
                Height = 32
                OnClick = agnt1Click
                ControlData = {020200004F0300004F030000}
              end
            end
            object grpPingOK: TGroupBox
              Left = 1
              Top = 14
              Width = 521
              Height = 195
              Align = alClient
              Caption = 'Reply OK Data'
              Ctl3D = True
              ParentCtl3D = False
              TabOrder = 1
              object lstPingDataDesc: TListBox
                Left = 2
                Top = 15
                Width = 517
                Height = 178
                Align = alClient
                Color = clWindowFrame
                Font.Charset = ANSI_CHARSET
                Font.Color = clWhite
                Font.Height = -13
                Font.Name = #26032#32048#26126#39636
                Font.Style = []
                ItemHeight = 13
                ParentFont = False
                TabOrder = 0
              end
              object lstIp: TListBox
                Left = 376
                Top = 16
                Width = 113
                Height = 65
                ItemHeight = 13
                MultiSelect = True
                TabOrder = 1
                Visible = False
              end
            end
          end
        end
      end
    end
    object TabSheetSetMail: TTabSheet
      Caption = #30332#36865#22577#35686#20449#24687#35373#32622
      ImageIndex = 1
      object Panel9: TPanel
        Left = 0
        Top = 0
        Width = 753
        Height = 504
        Align = alClient
        TabOrder = 0
        object Panel10: TPanel
          Left = 1
          Top = 1
          Width = 256
          Height = 502
          Align = alLeft
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 0
          object Panel20: TPanel
            Left = 1
            Top = 1
            Width = 254
            Height = 500
            Align = alClient
            TabOrder = 0
            object GboxSetMail: TGroupBox
              Left = 1
              Top = 100
              Width = 252
              Height = 399
              Align = alClient
              TabOrder = 0
              object labUserName: TLabel
                Left = 17
                Top = 57
                Width = 42
                Height = 13
                AutoSize = False
                Caption = #29992#25142#21517':'
              end
              object labDepartment: TLabel
                Left = 25
                Top = 28
                Width = 33
                Height = 13
                AutoSize = False
                Caption = #37096#38272':'
              end
              object labUserID: TLabel
                Left = 17
                Top = 88
                Width = 49
                Height = 13
                AutoSize = False
                Caption = #29992#25142'ID:'
              end
              object labAT: TLabel
                Left = 63
                Top = 120
                Width = 11
                Height = 13
                AutoSize = False
                Caption = '@'
              end
              object edtDepartment: TEdit
                Left = 62
                Top = 24
                Width = 163
                Height = 19
                Color = clYellow
                TabOrder = 0
                Text = 'edtDepartment'
              end
              object edtUserName: TEdit
                Left = 62
                Top = 54
                Width = 163