unit1.dfm

一款用delphy编写的关于网络流量检测的软件 能轻松的监测本机的网络流量信息

object Form1: TForm1
  Left = 262
  Top = 160
  Width = 692
  Height = 294
  Caption = 'Delphi Sample: IP Traffic Monitor'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Chart1: TChart
    Left = 0
    Top = 0
    Width = 684
    Height = 267
    AllowPanning = pmNone
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      'IP LAN Activity')
    ClipPoints = False
    LeftAxis.Labels = False
    View3D = False
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 0
    object Series1: TLineSeries
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = False
      SeriesColor = clRed
      Title = 'Packets Out'
      VertAxis = aBothVertAxis
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series2: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clGreen
      Title = 'Packets In'
      VertAxis = aBothVertAxis
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 368
    Top = 8
  end
end