ftppas.dfm

基于delphi的FPT文件传输系统,希望对大家有用

object Form1: TForm1
  Left = 217
  Top = 365
  BorderStyle = bsDialog
  Caption = 'FTP--'#25991#20214#20256#36755
  ClientHeight = 371
  ClientWidth = 581
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 561
    Height = 89
    Caption = #22522#26412#35774#32622
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 42
      Height = 21
      Caption = #20027#26426
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 184
      Top = 24
      Width = 63
      Height = 21
      Caption = #29992#25143#21517
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 384
      Top = 24
      Width = 42
      Height = 21
      Caption = #23494#30721
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 64
      Width = 64
      Height = 16
      Caption = #20256#36755#26041#24335
    end
    object Label5: TLabel
      Left = 384
      Top = 64
      Width = 32
      Height = 16
      Caption = #31471#21475
    end
    object Edit1: TEdit
      Left = 56
      Top = 24
      Width = 121
      Height = 24
      TabOrder = 0
      Text = '192.168.0.96'
    end
    object Edit2: TEdit
      Left = 256
      Top = 24
      Width = 113
      Height = 24
      TabOrder = 1
      Text = 'anonymous'
    end
    object Edit3: TEdit
      Left = 432
      Top = 24
      Width = 113
      Height = 24
      PasswordChar = '*'
      TabOrder = 2
      Text = '1596245'
    end
    object rad1: TRadioButton
      Left = 72
      Top = 64
      Width = 113
      Height = 17
      Caption = 'MODE_ASCII'
      Checked = True
      TabOrder = 3
      TabStop = True
    end
    object rad2: TRadioButton
      Left = 176
      Top = 64
      Width = 105
      Height = 17
      Caption = 'MODE_IMAGE'
      TabOrder = 4
    end
    object rad3: TRadioButton
      Left = 280
      Top = 64
      Width = 97
      Height = 17
      Caption = 'MODE_BYTE'
      TabOrder = 5
    end
    object Button1: TButton
      Left = 464
      Top = 52
      Width = 83
      Height = 33
      Caption = #36830#25509
      TabOrder = 6
      OnClick = Button1Click
    end
    object Edit4: TEdit
      Left = 416
      Top = 56
      Width = 41
      Height = 24
      TabOrder = 7
      Text = '21'
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 96
    Width = 561
    Height = 249
    TabOrder = 1
    object lbs: TListBox
      Left = 8
      Top = 16
      Width = 209
      Height = 225
      ItemHeight = 16
      MultiSelect = True
      PopupMenu = pm
      TabOrder = 0
      OnDblClick = lbsDblClick
      OnMouseDown = lbsMouseDown
    end
    object filedl: TFileListBox
      Left = 232
      Top = 48
      Width = 161
      Height = 193
      ItemHeight = 16
      MultiSelect = True
      PopupMenu = pm
      TabOrder = 1
      OnMouseDown = filedlMouseDown
    end
    object filedr: TDriveComboBox
      Left = 400
      Top = 16
      Width = 153
      Height = 22
      DirList = filede
      TabOrder = 2
      OnChange = filedrChange
    end
    object filede: TDirectoryListBox
      Left = 400
      Top = 48
      Width = 153
      Height = 193
      FileList = filedl
      ItemHeight = 16
      TabOrder = 3
      OnChange = filedeChange
    end
    object pb: TProgressBar
      Left = 232
      Top = 16
      Width = 161
      Height = 24
      TabOrder = 4
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 352
    Width = 581
    Height = 19
    Panels = <
      item
        Width = 200
      end
      item
        Width = 200
      end
      item
        Width = 50
      end>
  end
  object pm: TPopupMenu
    AutoHotkeys = maManual
    Left = 88
    Top = 160
    object N1: TMenuItem
      Caption = #19978#20256
      Enabled = False
      ShortCut = 16469
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #19979#36733
      Enabled = False
      ShortCut = 16452
      OnClick = N2Click
    end
    object N3: TMenuItem
      Caption = #26032#24314#25991#20214#22841
      Enabled = False
      ShortCut = 16462
      OnClick = N3Click
    end
    object N4: TMenuItem
      Caption = #21024#38500#25991#20214#22841
      Enabled = False
      OnClick = N4Click
    end
    object N5: TMenuItem
      Caption = #21024#38500#25991#20214'(&D)'
      Enabled = False
      OnClick = N5Click
    end
    object N6: TMenuItem
      Caption = #37325#21629#21517
      Enabled = False
      ShortCut = 16466
      OnClick = N6Click
    end
  end
end