object DlgNetMonMain: TDlgNetMonMain Left = 0 Top = 0 BorderIcons = [biSystemMenu, biMinimize] Caption = 'NetMon' ClientHeight = 434 ClientWidth = 584 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Segoe UI' Font.Style = [] Position = poScreenCenter TextHeight = 15 object pcMain: TPageControl Left = 0 Top = 0 Width = 584 Height = 434 ActivePage = tabNetList Align = alClient TabOrder = 0 ExplicitWidth = 580 ExplicitHeight = 433 object tabNetList: TTabSheet Caption = #45348#53944#50892#53356' '#47785#47197' '#51221#48372 object pnClient: TPanel Left = 0 Top = 25 Width = 576 Height = 379 Align = alClient TabOrder = 0 ExplicitWidth = 572 ExplicitHeight = 378 object SP1: TSplitter Left = 1 Top = 273 Width = 574 Height = 5 Cursor = crVSplit Align = alBottom ExplicitTop = 1 ExplicitWidth = 174 end object vtList: TVirtualStringTree Left = 1 Top = 1 Width = 574 Height = 272 Align = alClient Colors.BorderColor = 15987699 Colors.DisabledColor = clGray Colors.DropMarkColor = 15385233 Colors.DropTargetColor = 15385233 Colors.DropTargetBorderColor = 15385233 Colors.FocusedSelectionColor = 15385233 Colors.FocusedSelectionBorderColor = 15385233 Colors.GridLineColor = 15987699 Colors.HeaderHotColor = clBlack Colors.HotColor = clBlack Colors.SelectionRectangleBlendColor = 15385233 Colors.SelectionRectangleBorderColor = 15385233 Colors.SelectionTextColor = clBlack Colors.TreeLineColor = 9471874 Colors.UnfocusedColor = clGray Colors.UnfocusedSelectionColor = clWhite Colors.UnfocusedSelectionBorderColor = clWhite Header.AutoSizeIndex = 0 Header.Options = [hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible] HintMode = hmTooltip ParentShowHint = False PopupMenu = popFun ShowHint = True TabOrder = 0 TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages] TreeOptions.SelectionOptions = [toFullRowSelect, toRightClickSelect] OnCompareNodes = vtListCompareNodes OnFreeNode = vtListFreeNode OnGetText = vtListGetText OnGetHint = vtListGetHint OnGetNodeDataSize = vtListGetNodeDataSize Touch.InteractiveGestures = [igPan, igPressAndTap] Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough] Columns = < item Position = 0 Text = 'Index' end item Position = 1 Text = #49345#53468 Width = 70 end item Position = 2 Text = #49444#47749 Width = 140 end item Position = 3 Text = 'IP '#51452#49548 Width = 100 end item Position = 4 Text = 'MAC '#51452#49548 Width = 100 end item Position = 5 Text = #51060#47492 Width = 120 end item Position = 6 Text = 'Type' Width = 80 end item Position = 7 Text = 'DHCP' end> end object vtWlan: TVirtualStringTree Left = 1 Top = 278 Width = 574 Height = 100 Align = alBottom Colors.BorderColor = 15987699 Colors.DisabledColor = clGray Colors.DropMarkColor = 15385233 Colors.DropTargetColor = 15385233 Colors.DropTargetBorderColor = 15385233 Colors.FocusedSelectionColor = 15385233 Colors.FocusedSelectionBorderColor = 15385233 Colors.GridLineColor = 15987699 Colors.HeaderHotColor = clBlack Colors.HotColor = clBlack Colors.SelectionRectangleBlendColor = 15385233 Colors.SelectionRectangleBorderColor = 15385233 Colors.SelectionTextColor = clBlack Colors.TreeLineColor = 9471874 Colors.UnfocusedColor = clGray Colors.UnfocusedSelectionColor = clWhite Colors.UnfocusedSelectionBorderColor = clWhite Header.AutoSizeIndex = 0 Header.Options = [hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible] HintMode = hmTooltip ParentShowHint = False PopupMenu = popFun2 ShowHint = True TabOrder = 1 TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages] TreeOptions.SelectionOptions = [toFullRowSelect] OnContextPopup = vtWlanContextPopup OnFreeNode = vtWlanFreeNode OnGetText = vtWlanGetText OnGetHint = vtWlanGetHint OnGetNodeDataSize = vtWlanGetNodeDataSize Touch.InteractiveGestures = [igPan, igPressAndTap] Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough] Columns = < item Position = 0 Text = #48264#54840 end item Position = 1 Text = #47924#49440' '#45348#53944#50892#53356' '#51060#47492 Width = 150 end item Position = 2 Text = #51109#52824' '#51060#47492 Width = 150 end item Position = 3 Text = #54408#51656 Width = 70 end item Position = 4 Text = #48372#50504#49324#50857 Width = 70 end item Position = 5 Text = #50508#44256#47532#51608'1' Width = 70 end item Position = 6 Text = #50508#44256#47532#51608'2' Width = 70 end item Position = 7 Text = 'BSSID' Width = 80 end> end end object pnTop: TPanel Left = 0 Top = 0 Width = 576 Height = 25 Align = alTop BevelOuter = bvNone TabOrder = 1 ExplicitWidth = 572 object btnRefresh: TSpeedButton Left = 1 Top = 2 Width = 70 Height = 22 Caption = #49352#47196#44256#52840 OnClick = btnRefreshClick end end end object tabNetMon: TTabSheet Caption = #45348#53944#50892#53356' '#44048#49884'/'#52264#45800 ImageIndex = 1 object mmLog: TMemo Left = 0 Top = 273 Width = 576 Height = 131 Align = alClient ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end object pnMon: TPanel Left = 0 Top = 0 Width = 576 Height = 273 Align = alTop BevelOuter = bvNone TabOrder = 1 object btnNetMon: TSpeedButton Left = 1 Top = 1 Width = 94 Height = 22 Caption = #44048#49884'/'#52264#45800' '#49884#51089 OnClick = btnNetMonClick end object Label1: TLabel Left = 119 Top = 205 Width = 12 Height = 15 Caption = #52488 end object Label2: TLabel Left = 456 Top = 172 Width = 37 Height = 15 Caption = '% '#51060#54616 end object chPreventDescInfo: TCheckBox Left = 16 Top = 40 Width = 281 Height = 17 Caption = #45348#53944#50892#53356' '#52852#46300' '#51221#48372#50640' '#45796#51020' '#47928#44396#44032' '#51080#51012#46412' '#52264#45800 TabOrder = 0 end object chReviveSec: TCheckBox Left = 16 Top = 179 Width = 193 Height = 17 Caption = #52264#45800#54616#44256' '#51068#51221' '#49884#44036' '#54980' '#46104#49332#47548 Checked = True State = cbChecked TabOrder = 4 end object edReviveSec: TEdit Left = 32 Top = 202 Width = 81 Height = 23 Alignment = taRightJustify NumbersOnly = True TabOrder = 5 Text = '3' end object chPreventWireless: TCheckBox Left = 336 Top = 40 Width = 153 Height = 17 Caption = #47924#49440' '#45348#53944#50892#53356' '#52264#45800 TabOrder = 6 end object chPW_Public: TCheckBox Left = 352 Top = 65 Width = 201 Height = 17 Caption = #44277#44060' '#45348#53944#50892#53356#47564' '#52264#45800' ('#48372#50504#53412' X)' TabOrder = 7 end object chPW_Algo: TCheckBox Left = 352 Top = 90 Width = 193 Height = 17 Caption = #51648#51221#46108' '#48372#50504' '#50508#44256#47532#51608#47564' '#54728#50857 TabOrder = 8 end object edPW_Algo: TEdit Left = 368 Top = 115 Width = 185 Height = 23 TabOrder = 9 Text = 'WPA|WPA_PSK|RSNA|RSNA_PSK' end object edPreventDescInfo: TMemo Left = 32 Top = 63 Width = 249 Height = 58 Lines.Strings = ( 'BLUETOOTH|VPN|VIRTUAL|ANDROID|' 'APPLE|MOBILE|VM') ScrollBars = ssVertical TabOrder = 1 end object chPW_Quality: TCheckBox Left = 352 Top = 146 Width = 97 Height = 17 Caption = #51217#49549' '#54408#51656' '#52264#45800 TabOrder = 10 end object edPW_Quality: TEdit Left = 368 Top = 169 Width = 81 Height = 23 Alignment = taRightJustify NumbersOnly = True TabOrder = 11 Text = '50' end object chPreventNew: TCheckBox Left = 16 Top = 129 Width = 265 Height = 17 Caption = 'IP '#48320#44221', '#49352#47196#50868' '#45348#53944#50892#53356' '#48212#44204' '#49884' '#52264#45800 TabOrder = 2 end object chPreventDHCP: TCheckBox Left = 16 Top = 153 Width = 209 Height = 17 Caption = 'DHCP '#52264#45800 TabOrder = 3 end object chPW_WifiName: TCheckBox Left = 352 Top = 202 Width = 201 Height = 17 Caption = #47924#49440' '#45348#53944#50892#53356' '#51060#47492' '#52264#45800 TabOrder = 12 end object edPW_WifiNames: TEdit Left = 368 Top = 225 Width = 185 Height = 23 TabOrder = 13 Text = 'TOCSG_B_5G|starbucks' end end end end object popFun: TPopupMenu AutoHotkeys = maManual Left = 516 Top = 178 object miPreventNic: TMenuItem Caption = #49324#50857' '#50504#54632 OnClick = miPreventNicClick end end object tInit: TTimer Enabled = False Interval = 500 OnTimer = tInitTimer Left = 260 Top = 178 end object popFun2: TPopupMenu Left = 332 Top = 363 object miDisconnect: TMenuItem Caption = #50672#44208' '#52264#45800 OnClick = miDisconnectClick end end end