106 lines
2.6 KiB
Plaintext
106 lines
2.6 KiB
Plaintext
object DlgUrlIpMon: TDlgUrlIpMon
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'UrlIpMon'
|
|
ClientHeight = 420
|
|
ClientWidth = 703
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Menu = MainMenu
|
|
Position = poScreenCenter
|
|
TextHeight = 15
|
|
object Splitter1: TSplitter
|
|
Left = 0
|
|
Top = 284
|
|
Width = 703
|
|
Height = 4
|
|
Cursor = crVSplit
|
|
Align = alBottom
|
|
ExplicitTop = 287
|
|
ExplicitWidth = 579
|
|
end
|
|
object vtList: TVirtualStringTree
|
|
Left = 0
|
|
Top = 0
|
|
Width = 703
|
|
Height = 284
|
|
Align = alClient
|
|
Header.AutoSizeIndex = 3
|
|
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible]
|
|
HintMode = hmTooltip
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages]
|
|
TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect, toRightClickSelect]
|
|
OnCompareNodes = vtListCompareNodes
|
|
OnFreeNode = vtListFreeNode
|
|
OnGetText = vtListGetText
|
|
OnGetHint = vtListGetHint
|
|
OnGetNodeDataSize = vtListGetNodeDataSize
|
|
OnHeaderClick = vtListHeaderClick
|
|
Touch.InteractiveGestures = [igPan, igPressAndTap]
|
|
Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough]
|
|
ExplicitTop = -2
|
|
Columns = <
|
|
item
|
|
Position = 0
|
|
Text = #48264#54840
|
|
end
|
|
item
|
|
Position = 1
|
|
Text = #45824#49345' URL'
|
|
Width = 200
|
|
end
|
|
item
|
|
Position = 2
|
|
Text = 'IP Count'
|
|
Width = 80
|
|
end
|
|
item
|
|
Position = 3
|
|
Text = #49688#51665#46108' IP'
|
|
Width = 369
|
|
end>
|
|
end
|
|
object mmLog: TMemo
|
|
Left = 0
|
|
Top = 288
|
|
Width = 703
|
|
Height = 132
|
|
Align = alBottom
|
|
ReadOnly = True
|
|
ScrollBars = ssBoth
|
|
TabOrder = 1
|
|
end
|
|
object MainMenu: TMainMenu
|
|
AutoHotkeys = maManual
|
|
Left = 160
|
|
Top = 136
|
|
object miCollectIP: TMenuItem
|
|
Caption = 'IP '#49688#51665
|
|
OnClick = miCollectIPClick
|
|
object miStart: TMenuItem
|
|
Caption = #49884#51089
|
|
OnClick = miStartClick
|
|
end
|
|
object miStop: TMenuItem
|
|
Caption = #51473#51648
|
|
Enabled = False
|
|
OnClick = miStopClick
|
|
end
|
|
object N3: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object miExit: TMenuItem
|
|
Caption = #51333#47308'(&X)'
|
|
OnClick = miExitClick
|
|
end
|
|
end
|
|
end
|
|
end
|