123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209 |
- object frmMian: TfrmMian
- Left = 240
- Top = 240
- Width = 775
- Height = 563
- BorderIcons = [biSystemMenu, biMaximize]
- Caption = 'SmartCost'#26381#21153#31243#24207
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 12
- object Splitter1: TSplitter
- Left = 162
- Top = 30
- Height = 480
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 510
- Width = 767
- Height = 19
- Panels = <
- item
- Text = ' '#26381#21153#22120#29366#24577#65306' '#20851#38381
- Width = 130
- end
- item
- Alignment = taCenter
- Text = ' '#29664#28023#32437#27178#21019#26032#36719#20214#26377#38480#20844#21496' '
- Width = 170
- end
- item
- Width = 50
- end>
- end
- object CoolBar1: TCoolBar
- Left = 0
- Top = 0
- Width = 767
- Height = 30
- Bands = <
- item
- Control = ToolBar1
- ImageIndex = -1
- Width = 767
- end>
- EdgeInner = esNone
- EdgeOuter = esNone
- object ToolBar1: TToolBar
- Left = 9
- Top = 0
- Width = 754
- Height = 25
- Align = alClient
- ButtonHeight = 20
- ButtonWidth = 67
- Caption = 'ToolBar1'
- EdgeInner = esNone
- EdgeOuter = esNone
- ShowCaptions = True
- TabOrder = 0
- object tbOpen: TToolButton
- Left = 0
- Top = 2
- Caption = #25171#24320#36830#25509
- ImageIndex = 0
- OnClick = tbOpenClick
- end
- object tbClose: TToolButton
- Left = 67
- Top = 2
- Caption = #26029#24320#36830#25509
- ImageIndex = 2
- OnClick = tbCloseClick
- end
- object tbPort: TToolButton
- Left = 134
- Top = 2
- Caption = #26356#25913#31471#21475#21495
- ImageIndex = 2
- OnClick = tbPortClick
- end
- object tbDeleteClient: TToolButton
- Left = 201
- Top = 2
- Caption = #21024#38500#29992#25143
- ImageIndex = 2
- OnClick = tbDeleteClientClick
- end
- object tbExit: TToolButton
- Left = 268
- Top = 2
- Caption = #20851#38381#31243#24207
- ImageIndex = 1
- OnClick = tbExitClick
- end
- end
- end
- object tvTree: TTreeView
- Left = 0
- Top = 30
- Width = 162
- Height = 480
- Align = alLeft
- Indent = 19
- TabOrder = 2
- end
- object zgClientInfo: TZJGrid
- Left = 165
- Top = 30
- Width = 602
- Height = 480
- Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
- OptionsEx = []
- ColCount = 4
- RowCount = 6
- ShowGridLine = False
- DefaultColWidth = 73
- DefaultFixedColWidth = 28
- Selection.AlphaBlend = False
- Selection.TransparentColor = False
- Align = alClient
- end
- object zaClientInfo: TZjGridDBA
- Columns = <
- item
- Title.Caption = 'IP'#22320#22336
- Title.CaptionAcrossCols = '1'
- Title.Font.Charset = GB2312_CHARSET
- Title.Font.Color = clWindowText
- Title.Font.Height = -12
- Title.Font.Name = #23435#20307
- Title.Font.Style = []
- Alignment = taLeftJustify
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- FieldName = 'IP'
- Width = 95
- ReadOnly = False
- end
- item
- Title.Caption = #24212#29992#31243#24207
- Title.CaptionAcrossCols = '1'
- Title.Font.Charset = GB2312_CHARSET
- Title.Font.Color = clWindowText
- Title.Font.Height = -12
- Title.Font.Name = #23435#20307
- Title.Font.Style = []
- Alignment = taCenter
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- FieldName = 'AppType'
- Width = 80
- ReadOnly = False
- end
- item
- Title.Caption = #38142#25509#26102#38388
- Title.CaptionAcrossCols = '1'
- Title.Font.Charset = GB2312_CHARSET
- Title.Font.Color = clWindowText
- Title.Font.Height = -12
- Title.Font.Name = #23435#20307
- Title.Font.Style = []
- Alignment = taCenter
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- FieldName = 'LinkTime'
- Width = 160
- ReadOnly = False
- end>
- Grid = zgClientInfo
- ExtendRowCount = 5
- Left = 355
- Top = 247
- end
- object PopupMenu: TPopupMenu
- AutoHotkeys = maManual
- Left = 214
- Top = 230
- object muShow: TMenuItem
- Caption = #26174#31034#26381#21153#22120
- OnClick = muShowClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object muExit: TMenuItem
- Caption = #36864#20986
- OnClick = muExitClick
- end
- end
- end
|