pingmain.dfm

来自「这个是Delphi 2007下写的」· DFM 代码 · 共 347 行

object frmPingMAC: TfrmPingMAC
  Left = 0
  Top = 0
  Caption = 'MAC'#25195#25551
  ClientHeight = 348
  ClientWidth = 549
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 549
    Height = 41
    Align = alTop
    BevelOuter = bvNone
    BorderWidth = 5
    TabOrder = 0
    object PanelIP: TPanel
      Left = 169
      Top = 5
      Width = 227
      Height = 31
      Align = alLeft
      BevelOuter = bvNone
      BorderWidth = 5
      TabOrder = 1
      object Label1: TLabel
        Left = 5
        Top = 5
        Width = 36
        Height = 21
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = #32593#20851
        Layout = tlCenter
        ExplicitHeight = 19
      end
      object Label2: TLabel
        Left = 135
        Top = 5
        Width = 22
        Height = 21
        Align = alRight
        Alignment = taRightJustify
        AutoSize = False
        Caption = #20174
        Layout = tlCenter
        ExplicitLeft = 123
        ExplicitTop = 2
      end
      object Label3: TLabel
        Left = 182
        Top = 5
        Width = 15
        Height = 21
        Align = alRight
        Alignment = taRightJustify
        AutoSize = False
        Caption = #21040
        Layout = tlCenter
        ExplicitLeft = 170
        ExplicitTop = 2
      end
      object Edit_Gateway: TEdit
        Left = 41
        Top = 5
        Width = 94
        Height = 21
        Align = alClient
        TabOrder = 0
        Text = '192.168.0.254'
        OnKeyPress = Edit_GatewayKeyPress
      end
      object Edit_Start: TEdit
        Left = 157
        Top = 5
        Width = 25
        Height = 21
        Align = alRight
        BiDiMode = bdLeftToRight
        MaxLength = 3
        ParentBiDiMode = False
        TabOrder = 1
        Text = '1'
        OnKeyPress = Edit_GatewayKeyPress
      end
      object Edit_End: TEdit
        Left = 197
        Top = 5
        Width = 25
        Height = 21
        Align = alRight
        BiDiMode = bdLeftToRight
        MaxLength = 3
        ParentBiDiMode = False
        TabOrder = 2
        Text = '254'
        OnKeyPress = Edit_GatewayKeyPress
      end
    end
    object Button1: TButton
      Left = 97
      Top = 5
      Width = 72
      Height = 31
      Align = alLeft
      Caption = #24320#22987#33719#21462
      TabOrder = 0
      OnClick = Button1Click
    end
    object Panel3: TPanel
      Left = 5
      Top = 5
      Width = 92
      Height = 31
      Align = alLeft
      BevelOuter = bvNone
      BorderWidth = 5
      TabOrder = 2
      object Label4: TLabel
        Left = 5
        Top = 5
        Width = 51
        Height = 21
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = #24182#21457#32447#31243
        Layout = tlCenter
        ExplicitLeft = 6
        ExplicitTop = 6
        ExplicitHeight = 19
      end
      object Edit_ThreadCount: TEdit
        Left = 56
        Top = 5
        Width = 24
        Height = 21
        Align = alLeft
        BiDiMode = bdLeftToRight
        MaxLength = 3
        ParentBiDiMode = False
        TabOrder = 0
        Text = '30'
        OnKeyPress = Edit_GatewayKeyPress
      end
    end
    object Panel4: TPanel
      Left = 480
      Top = 5
      Width = 64
      Height = 31
      Align = alRight
      BevelOuter = bvNone
      BorderWidth = 5
      TabOrder = 3
      object Label5: TLabel
        Left = 5
        Top = 5
        Width = 24
        Height = 21
        Align = alLeft
        Alignment = taRightJustify
        Caption = #36229#26102
        Layout = tlCenter
        ExplicitHeight = 13
      end
      object Edit_TimeOut: TEdit
        Left = 29
        Top = 5
        Width = 30
        Height = 21
        Align = alClient
        BiDiMode = bdLeftToRight
        MaxLength = 3
        ParentBiDiMode = False
        TabOrder = 0
        Text = '1000'
        OnKeyPress = Edit_GatewayKeyPress
      end
    end
    object CheckBox_waitARP: TCheckBox
      Left = 416
      Top = 5
      Width = 64
      Height = 31
      Align = alRight
      Caption = 'ARP'#31561#24453
      Checked = True
      State = cbChecked
      TabOrder = 4
      OnClick = CheckBox_waitARPClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 549
    Height = 307
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 8
    TabOrder = 1
    object Label6: TLabel
      Left = 8
      Top = 266
      Width = 533
      Height = 13
      Align = alBottom
      Alignment = taRightJustify
      Layout = tlCenter
      ExplicitLeft = 538
      ExplicitWidth = 3
    end
    object ListBox1: TListBox
      Left = 8
      Top = 8
      Width = 533
      Height = 258
      Align = alClient
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 0
      OnClick = ListBox1Click
      OnDblClick = ListBox1DblClick
    end
    object Panel5: TPanel
      Left = 8
      Top = 279
      Width = 533
      Height = 20
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      object Label7: TLabel
        Left = 0
        Top = 0
        Width = 33
        Height = 20
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'IP'#65306
        Layout = tlCenter
      end
      object Label8: TLabel
        Left = 202
        Top = 0
        Width = 45
        Height = 20
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'MAC'#65306
        Layout = tlCenter
        ExplicitLeft = 124
      end
      object Label9: TLabel
        Left = 132
        Top = 0
        Width = 45
        Height = 20
        Align = alLeft
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'LHEX'#65306
        Layout = tlCenter
        ExplicitLeft = 124
      end
      object Label10: TLabel
        Left = 372
        Top = 0
        Width = 36
        Height = 20
        Align = alRight
        Caption = #26597#35810#65306
        Layout = tlCenter
        ExplicitHeight = 13
      end
      object Edit_SIP: TEdit
        Left = 33
        Top = 0
        Width = 99
        Height = 20
        Align = alLeft
        Color = clCream
        ReadOnly = True
        TabOrder = 0
        OnClick = Edit_SIPClick
        ExplicitHeight = 21
      end
      object Edit_SMAC: TEdit
        Left = 247
        Top = 0
        Width = 100
        Height = 20
        Align = alLeft
        CharCase = ecUpperCase
        Color = clCream
        ReadOnly = True
        TabOrder = 1
        OnClick = Edit_SIPClick
        ExplicitHeight = 21
      end
      object Edit_SLHEX: TEdit
        Left = 177
        Top = 0
        Width = 25
        Height = 20
        Align = alLeft
        Color = clCream
        ReadOnly = True
        TabOrder = 2
        OnClick = Edit_SIPClick
        ExplicitHeight = 21
      end
      object EditSelect: TEdit
        Left = 408
        Top = 0
        Width = 125
        Height = 20
        Align = alRight
        CharCase = ecUpperCase
        TabOrder = 3
        OnKeyPress = EditSelectKeyPress
        ExplicitHeight = 21
      end
    end
  end
end