📄 ufrmadclientmng.dfm
字号:
ReadOnly = True
TabOrder = 3
end
object txtimgsrc: TEdit
Left = 223
Top = 60
Width = 383
Height = 20
Color = clScrollBar
ReadOnly = True
TabOrder = 4
end
object txtKeywords2: TMemo
Left = 622
Top = 56
Width = 360
Height = 74
Color = clScrollBar
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 5
end
object txtAdLink: TEdit
Left = 65
Top = 84
Width = 542
Height = 20
Color = clScrollBar
ReadOnly = True
TabOrder = 6
end
object txtReferer: TEdit
Left = 65
Top = 111
Width = 542
Height = 20
Color = clScrollBar
ReadOnly = True
TabOrder = 7
end
object txtUseIps: TEdit
Left = 652
Top = 31
Width = 329
Height = 20
Color = clScrollBar
ReadOnly = True
TabOrder = 8
end
object cmdGetAccount: TButton
Left = 648
Top = 161
Width = 67
Height = 25
Caption = #21047#26032
TabOrder = 9
OnClick = cmdGetAccountClick
end
object cmdAdd: TButton
Left = 738
Top = 161
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 10
OnClick = cmdAddClick
end
object cmdDel: TButton
Left = 823
Top = 161
Width = 75
Height = 25
Caption = #21024#38500
Enabled = False
TabOrder = 11
OnClick = cmdDelClick
end
object cmdModify: TButton
Left = 906
Top = 161
Width = 75
Height = 25
Caption = #20462#25913
TabOrder = 12
OnClick = cmdModifyClick
end
object txtSubType: TEdit
Left = 185
Top = 140
Width = 57
Height = 20
Color = clScrollBar
TabOrder = 13
end
object txtType: TEdit
Left = 65
Top = 139
Width = 57
Height = 20
Color = clScrollBar
TabOrder = 14
end
object txtIpRange: TEdit
Left = 315
Top = 139
Width = 292
Height = 20
Color = clScrollBar
TabOrder = 15
end
object txtAccount: TEdit
Left = 63
Top = 168
Width = 178
Height = 20
Color = clScrollBar
TabOrder = 16
end
end
end
object TabSheet2: TTabSheet
Caption = #26085#24535#20449#24687
ImageIndex = 1
object txtLog: TMemo
Left = 0
Top = 0
Width = 1002
Height = 196
Align = alClient
Lines.Strings = (
#26085#24535#31383#21475)
TabOrder = 0
end
end
object sheetCheckTraffic: TTabSheet
Caption = #27969#37327#26816#27979
ImageIndex = 2
object Label11: TLabel
Left = 184
Top = 10
Width = 48
Height = 12
Caption = '43906838'
end
object Label12: TLabel
Left = 10
Top = 10
Width = 54
Height = 12
Caption = '439068382'
end
object Label13: TLabel
Left = 342
Top = 10
Width = 42
Height = 12
Caption = 'xiaotm3'
end
object Label5: TLabel
Left = 470
Top = 8
Width = 24
Height = 12
Caption = #38408#20540
end
object txtResult: TMemo
Left = 0
Top = 31
Width = 1002
Height = 165
Align = alBottom
ScrollBars = ssVertical
TabOrder = 0
end
object cmdCheckTraffic: TButton
Left = 584
Top = 2
Width = 97
Height = 25
Caption = #27969#37327#35774#32622#26816#39564
TabOrder = 1
OnClick = cmdCheckTrafficClick
end
object txt43906838: TEdit
Left = 236
Top = 6
Width = 49
Height = 20
TabOrder = 2
Text = '210'
end
object txt439068382: TEdit
Left = 68
Top = 6
Width = 49
Height = 20
TabOrder = 3
Text = '329'
end
object txtxiaotm3: TEdit
Left = 388
Top = 6
Width = 49
Height = 20
TabOrder = 4
Text = '129'
end
object txtYuZhi: TEdit
Left = 500
Top = 3
Width = 49
Height = 20
TabOrder = 5
Text = '1.2'
end
object cmdIPRange: TButton
Left = 752
Top = 0
Width = 121
Height = 25
Caption = #32479#35745'IP'#20998#24067#24773#20917
TabOrder = 6
OnClick = cmdIPRangeClick
end
end
end
object IdTCPClient1: TIdTCPClient
MaxLineAction = maException
Port = 0
Left = 608
Top = 64
end
object DataSource1: TDataSource
DataSet = memDB
Left = 184
Top = 112
end
object PopupMenu1: TPopupMenu
Left = 328
Top = 72
object mnuSelectOrNotSelect: TMenuItem
Caption = #21453#36873
OnClick = mnuSelectOrNotSelectClick
end
object mnuEdit: TMenuItem
Caption = #20462#25913
OnClick = mnuEditClick
end
object mnuCopyAccount: TMenuItem
Caption = #20811#38534#24080#21495
OnClick = mnuCopyAccountClick
end
object mnuAccountMoveTo: TMenuItem
Caption = #24080#21495#36716#31227#21040'...'
OnClick = mnuAccountMoveToClick
end
object N6: TMenuItem
Caption = '-'
end
object mnuDeleteRecord: TMenuItem
Caption = #21024#38500
Enabled = False
OnClick = mnuDeleteRecordClick
end
object N3: TMenuItem
Caption = '-'
end
object mnuAddIE_cpc: TMenuItem
Caption = #26032#22686'ie_cpc'
OnClick = mnuAddIE_cpcClick
end
object mnuAddSearchGet: TMenuItem
Caption = #26032#22686'search_get'
OnClick = mnuAddSearchGetClick
end
object mnuAddABCSearch: TMenuItem
Caption = #26032#22686'abcsearch'
OnClick = mnuAddABCSearchClick
end
object mnuAddiframe_cpc: TMenuItem
Caption = #26032#22686'iframe_cpc'
OnClick = mnuAddiframe_cpcClick
end
object mnuAddxmlfeed: TMenuItem
Caption = #26032#22686'xmlfeed'
OnClick = mnuAddxmlfeedClick
end
object N1: TMenuItem
Caption = '-'
end
object mnuSetRuntimes: TMenuItem
Caption = #35774#32622#36816#34892#27425#25968'...'
OnClick = mnuSetRuntimesClick
end
end
object MainMenu1: TMainMenu
Left = 408
Top = 64
object N2: TMenuItem
Caption = #25805#20316
object mnuDownloadDB: TMenuItem
Caption = #19979#36733#25968#25454#24211
OnClick = mnuDownloadDBClick
end
object mnuDownReferer: TMenuItem
Caption = #19979#36733#25351#23450#25991#20214'...'
OnClick = mnuDownRefererClick
end
object mnuDelChina: TMenuItem
Caption = #21024#38500#20013#22269#30340#26426#22120
OnClick = mnuDelChinaClick
end
object N4: TMenuItem
Caption = '-'
end
object N5: TMenuItem
Caption = #36864#20986
OnClick = N5Click
end
end
end
object memDB: TdxMemData
Indexes = <>
SortOptions = []
Left = 368
Top = 280
object memDBfid: TIntegerField
FieldName = 'fid'
end
object memDBshows: TIntegerField
FieldName = 'shows'
end
object memDBhits: TIntegerField
FieldName = 'hits'
end
object memDBzorder: TIntegerField
FieldName = 'zorder1'
end
object memDBuser: TStringField
DisplayWidth = 100
FieldName = 'user'
Size = 257
end
object memDBaccount: TStringField
FieldName = 'account'
Size = 128
end
object memDBftype: TStringField
FieldName = 'ftype'
Size = 256
end
object memDBadlink: TStringField
FieldName = 'adlink'
Size = 4000
end
object memDBreferer: TStringField
FieldName = 'referer'
Size = 4000
end
object memDBkeywords2: TStringField
FieldName = 'keywords2'
Size = 256
end
object memDBahref: TStringField
FieldName = 'ahref'
Size = 1024
end
object memDBimgsrc: TStringField
FieldName = 'imgsrc'
Size = 256
end
object memDBctr: TStringField
FieldName = 'ctr'
end
object memDBthreads: TStringField
FieldName = 'threads'
end
object memDBmemo: TStringField
FieldName = 'memo'
Size = 256
end
object memDBruntimes: TStringField
FieldName = 'runtimes'
end
object memDBisselected: TStringField
FieldName = 'isselected'
end
object memDBcountry: TStringField
DisplayWidth = 50
FieldName = 'country'
Size = 512
end
object memDBisHits: TStringField
FieldName = 'isHits'
end
object memDBowner: TStringField
FieldName = 'owner'
end
object memDBuseips: TStringField
FieldName = 'useips'
Size = 200
end
object memDBiprange: TStringField
FieldName = 'iprange'
Size = 200
end
object memDBneedlog: TStringField
FieldName = 'needlog'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -