testsetmtu.~dfm

delphi ping程序 测试主机的IP地址,是否连通?

object Form1: TForm1
  Left = 304
  Top = 392
  Width = 656
  Height = 218
  Caption = #36828#31243#20027#26426'MTU'#27979#35797#21450#20462#25913
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 120
  TextHeight = 16
  object Button1: TButton
    Left = 48
    Top = 40
    Width = 145
    Height = 41
    Caption = #21021#22987#21270#20027#26426
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 232
    Top = 40
    Width = 145
    Height = 41
    Caption = #27979#35797#20027#26426#22320#22336'var'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button3: TButton
    Left = 480
    Top = 56
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 2
    OnClick = Button3Click
  end
end