cap_main.dfm

delphi写的网络抓包工具

object Form1: TForm1
  Left = 123
  Top = 87
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #32593#32476#25968#25454#21253#25429#33719#22120
  ClientHeight = 564
  ClientWidth = 815
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  DesignSize = (
    815
    564)
  PixelsPerInch = 96
  TextHeight = 13
  object BitBtn1: TBitBtn
    Left = 745
    Top = 27
    Width = 65
    Height = 25
    Anchors = [akTop, akRight]
    Caption = #24320#22987#25429#25417
    TabOrder = 0
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 746
    Top = 70
    Width = 65
    Height = 25
    Anchors = [akTop, akRight]
    Caption = #26242#20572#25429#25417
    TabOrder = 1
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 746
    Top = 110
    Width = 65
    Height = 25
    Anchors = [akTop, akRight]
    Caption = #32467#26463#25429#25417
    TabOrder = 2
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 745
    Top = 523
    Width = 65
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = #36864'    '#20986
    TabOrder = 3
    OnClick = BitBtn4Click
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 739
    Height = 564
    ActivePage = TabSheet1
    Align = alLeft
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 4
    object TabSheet1: TTabSheet
      Caption = #25968#25454#26597#30475
      object StringGrid1: TStringGrid
        Left = 0
        Top = 0
        Width = 731
        Height = 281
        Align = alTop
        BiDiMode = bdLeftToRight
        ColCount = 7
        DefaultRowHeight = 17
        FixedCols = 0
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowMoving, goColMoving, goEditing, goRowSelect]
        ParentBiDiMode = False
        TabOrder = 0
        OnClick = StringGrid1Click
        ColWidths = (
          57
          101
          45
          97
          54
          49
          158)
      end
      object PageControl2: TPageControl
        Left = 0
        Top = 281
        Width = 731
        Height = 255
        ActivePage = TabSheet3
        Align = alClient
        TabOrder = 1
        object TabSheet3: TTabSheet
          Caption = 'ASII'
          object Memo1: TMemo
            Left = 0
            Top = 0
            Width = 723
            Height = 227
            Align = alClient
            TabOrder = 0
          end
        end
        object TabSheet4: TTabSheet
          Caption = 'HEX'
          ImageIndex = 1
          object Memo2: TMemo
            Left = 0
            Top = 0
            Width = 723
            Height = 227
            Align = alClient
            TabOrder = 0
          end
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'TabSheet2'
      ImageIndex = 1
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 731
        Height = 536
        Align = alClient
        Caption = 'Panel1'
        TabOrder = 0
        object ListView1: TListView
          Left = 1
          Top = 1
          Width = 729
          Height = 534
          Align = alClient
          Columns = <
            item
              Caption = #31867#22411
              Width = 60
            end
            item
              Caption = #21457'IP'
              Width = 120
            end
            item
              Caption = #21457#31471#21475
            end
            item
              Caption = #25910'IP'
              Width = 120
            end
            item
              Caption = #25910#31471#21475
            end
            item
              Caption = #22823#23567
            end
            item
              Caption = #25968#25454
              Width = 500
            end>
          GridLines = True
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
    end
  end
  object BitBtn5: TBitBtn
    Left = 746
    Top = 149
    Width = 65
    Height = 25
    Anchors = [akTop, akRight]
    Caption = #28165#31354#25968#25454
    TabOrder = 5
    OnClick = BitBtn5Click
  end
end