dllform.dfm

千年2的脱机源代码

object DllForm1: TDllForm1
  Left = 300
  Top = 169
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  Caption = #21315#24180'  ---- '#23553#21253#30417#35270
  ClientHeight = 373
  ClientWidth = 487
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 487
    Height = 373
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #23553#21253#21015#34920
      object ListSend: TListView
        Left = 0
        Top = 0
        Width = 480
        Height = 145
        Columns = <
          item
            Caption = 'send'
            Width = 40
          end
          item
            Caption = #24635#38271#24230
            Width = 40
          end
          item
            Caption = 'num'
            Width = 40
          end
          item
            Caption = 'four'
            Width = 40
          end
          item
            Caption = 'size'
            Width = 40
          end
          item
            Caption = 'ctrl'
            Width = 40
          end
          item
            Caption = #21442#25968
            Width = 150
          end
          item
            Caption = #20869#23384#21442#25968
            Width = 150
          end>
        Ctl3D = False
        GridLines = True
        RowSelect = True
        TabOrder = 0
        ViewStyle = vsReport
        OnSelectItem = ListSendSelectItem
      end
      object Checksend: TCheckBox
        Left = 8
        Top = 148
        Width = 89
        Height = 17
        Caption = #28155#21152'send'#23553#21253
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        State = cbChecked
        TabOrder = 1
      end
      object Checksave: TCheckBox
        Left = 216
        Top = 148
        Width = 57
        Height = 17
        Caption = #20445#23384#21040
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object Edit1: TEdit
        Left = 272
        Top = 148
        Width = 201
        Height = 21
        TabOrder = 3
        Text = 'F:\cracker\'#28304#20195#30721'\delphi\'#21315#24180#22806#25346'\'#21315#24180#23553#21253#25130#21462'\fenbao.txt'
      end
      object ListRecv: TListView
        Left = 0
        Top = 168
        Width = 481
        Height = 137
        Columns = <
          item
            Caption = 'recv'
            Width = 40
          end
          item
            Caption = #24635#38271#24230
            Width = 40
          end
          item
            Caption = 'num'
            Width = 40
          end
          item
            Caption = 'four'
            Width = 40
          end
          item
            Caption = 'size'
            Width = 40
          end
          item
            Caption = 'wcmd'
            Width = 40
          end
          item
            Caption = #21442#25968
            Width = 150
          end
          item
            Caption = #20869#23384#21442#25968
            Width = 150
          end>
        Ctl3D = False
        GridLines = True
        RowSelect = True
        TabOrder = 4
        ViewStyle = vsReport
        OnSelectItem = ListRecvSelectItem
      end
      object Buttonsend: TButton
        Left = 104
        Top = 152
        Width = 89
        Height = 17
        Caption = #28165#31354' send '#34920
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = ButtonsendClick
      end
      object Checkrecv: TCheckBox
        Left = 0
        Top = 312
        Width = 97
        Height = 17
        Caption = #28155#21152'recv'#23553#21253
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        State = cbChecked
        TabOrder = 6
      end
      object Buttonrecv: TButton
        Left = 104
        Top = 312
        Width = 89
        Height = 17
        Caption = #28165#31354' recv '#34920
        TabOrder = 7
        OnClick = ButtonrecvClick
      end
    end
    object TabSheet2: TTabSheet
      Caption = #22079#22079
      ImageIndex = 1
    end
  end
  object Edit2: TEdit
    Left = 0
    Top = 352
    Width = 481
    Height = 21
    BevelInner = bvLowered
    TabOrder = 1
  end
end