www.pudn.com > »Ò¸ë×ÓVIP1.2.rar > FTPServerUnit.dfm

object FTPServerForm: TFTPServerForm 
  Left = 345 
  Top = 190 
  AutoScroll = False 
  BorderIcons = [] 
  Caption = 'FTP Server' 
  ClientHeight = 370 
  ClientWidth = 344 
  Color = clBtnFace 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  OldCreateOrder = False 
  Position = poScreenCenter 
  PixelsPerInch = 96 
  TextHeight = 13 
  object Label1: TspSkinStdLabel 
    Left = 46 
    Top = 18 
    Width = 66 
    Height = 12 
    UseSkinFont = True 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'stdlabel' 
    Font.Charset = ANSI_CHARSET 
    Font.Color = clBtnText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Caption = 'FTP'#20027#30446#24405#65306 
    ParentFont = False 
  end 
  object Label3: TspSkinStdLabel 
    Left = 46 
    Top = 72 
    Width = 48 
    Height = 12 
    UseSkinFont = True 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'stdlabel' 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Caption = #29992#25143#21517#65306 
    ParentFont = False 
  end 
  object Label4: TspSkinStdLabel 
    Left = 46 
    Top = 100 
    Width = 36 
    Height = 12 
    UseSkinFont = True 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'stdlabel' 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Caption = #23494#30721#65306 
    ParentFont = False 
  end 
  object Label5: TspSkinStdLabel 
    Left = 46 
    Top = 128 
    Width = 48 
    Height = 12 
    UseSkinFont = True 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'stdlabel' 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Caption = #27426#36814#35789#65306 
    ParentFont = False 
  end 
  object Label2: TspSkinStdLabel 
    Left = 46 
    Top = 44 
    Width = 60 
    Height = 12 
    UseSkinFont = True 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'stdlabel' 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Caption = #26381#21153#31471#21475#65306 
    ParentFont = False 
  end 
  object FilenameEdit1: TspSkinEdit 
    Left = 116 
    Top = 12 
    Width = 185 
    Height = 20 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 20 
    ButtonMode = True 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'buttonedit' 
    AlphaBlend = False 
    AlphaBlendValue = 0 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ImeName = #26368#24378#20116#31508#36755#20837#27861 
    ParentFont = False 
    TabOrder = 0 
    OnButtonClick = FilenameEdit1ButtonClick 
  end 
  object UserEdit: TspSkinEdit 
    Left = 116 
    Top = 68 
    Width = 89 
    Height = 20 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 20 
    ButtonMode = False 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'edit' 
    AlphaBlend = False 
    AlphaBlendValue = 0 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clGrayText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Enabled = False 
    ImeName = #26368#24378#20116#31508#36755#20837#27861 
    MaxLength = 16 
    ParentFont = False 
    TabOrder = 1 
  end 
  object PassEdit: TspSkinEdit 
    Left = 116 
    Top = 96 
    Width = 89 
    Height = 20 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 20 
    ButtonMode = False 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'edit' 
    AlphaBlend = False 
    AlphaBlendValue = 0 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clGrayText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    Enabled = False 
    ImeName = #26368#24378#20116#31508#36755#20837#27861 
    MaxLength = 16 
    ParentFont = False 
    TabOrder = 2 
  end 
  object BEdit: TspSkinEdit 
    Left = 116 
    Top = 124 
    Width = 185 
    Height = 20 
    Text = 'Welcome To huigezi Ftp!' 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 20 
    ButtonMode = False 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'edit' 
    AlphaBlend = False 
    AlphaBlendValue = 0 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ImeName = #26368#24378#20116#31508#36755#20837#27861 
    MaxLength = 16 
    ParentFont = False 
    TabOrder = 3 
  end 
  object PortEdit: TspSkinEdit 
    Left = 116 
    Top = 40 
    Width = 49 
    Height = 20 
    Text = '2121' 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 20 
    ButtonMode = False 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'edit' 
    AlphaBlend = False 
    AlphaBlendValue = 0 
    Font.Charset = GB2312_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -12 
    Font.Name = #23435#20307 
    Font.Style = [] 
    ImeName = #26368#24378#20116#31508#36755#20837#27861 
    MaxLength = 16 
    ParentFont = False 
    TabOrder = 4 
  end 
  object StartButton: TspSkinButton 
    Left = 59 
    Top = 164 
    Width = 92 
    Height = 22 
    Cursor = crHandPoint 
    TabOrder = 5 
    DrawDefault = True 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'button' 
    AlphaBlend = False 
    AlphaBlendValue = 200 
    UseSkinCursor = False 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 0 
    RepeatMode = False 
    RepeatInterval = 100 
    AllowAllUp = False 
    TabStop = True 
    CanFocused = False 
    Down = False 
    GroupIndex = 0 
    Caption = #24320#21551#26381#21153 
    NumGlyphs = 1 
    Spacing = 1 
    OnClick = StartButtonClick 
  end 
  object StopButton: TspSkinButton 
    Left = 167 
    Top = 164 
    Width = 92 
    Height = 22 
    Cursor = crHandPoint 
    TabOrder = 6 
    DrawDefault = True 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'button' 
    AlphaBlend = False 
    AlphaBlendValue = 200 
    UseSkinCursor = False 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 0 
    RepeatMode = False 
    RepeatInterval = 100 
    AllowAllUp = False 
    TabStop = True 
    CanFocused = False 
    Down = False 
    GroupIndex = 0 
    Caption = #20572#27490#26381#21153 
    NumGlyphs = 1 
    Spacing = 1 
    Enabled = False 
    OnClick = StopButtonClick 
  end 
  object CheckBox6: TspSkinCheckRadioBox 
    Left = 214 
    Top = 70 
    Width = 87 
    Height = 16 
    TabOrder = 7 
    DrawDefault = True 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'checkbox' 
    AlphaBlend = False 
    AlphaBlendValue = 200 
    UseSkinCursor = False 
    DefaultFont.Charset = GB2312_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = -12 
    DefaultFont.Name = #23435#20307 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 0 
    ImageIndex = 0 
    CanFocused = False 
    Radio = False 
    Checked = True 
    GroupIndex = 0 
    Flat = False 
    Caption = #21311#21517 
    OnClick = CheckBox6Click 
  end 
  object Panel1: TspSkinPanel 
    Left = 0 
    Top = 212 
    Width = 344 
    Height = 158 
    TabOrder = 8 
    DrawDefault = True 
    SkinData = HgzVip.spSkinData1 
    SkinDataName = 'panel' 
    AlphaBlend = False 
    AlphaBlendValue = 200 
    UseSkinCursor = False 
    DefaultFont.Charset = DEFAULT_CHARSET 
    DefaultFont.Color = clWindowText 
    DefaultFont.Height = 14 
    DefaultFont.Name = 'Arial' 
    DefaultFont.Style = [] 
    UseSkinFont = True 
    DefaultWidth = 0 
    DefaultHeight = 0 
    RealHeight = -1 
    AutoEnabledControls = True 
    CheckedMode = False 
    Checked = False 
    NumGlyphs = 1 
    Spacing = 2 
    DefaultAlignment = taLeftJustify 
    DefaultCaptionHeight = 22 
    BorderStyle = bvRaised 
    CaptionMode = False 
    RollUpMode = False 
    RollUpState = False 
    Caption = 'Panel1' 
    Align = alBottom 
    object Memo1: TspSkinMemo 
      Left = 1 
      Top = 1 
      Width = 325 
      Height = 156 
      Align = alClient 
      Font.Charset = DEFAULT_CHARSET 
      Font.Color = clWindowText 
      Font.Height = 14 
      Font.Name = 'Arial' 
      Font.Style = [] 
      ImeName = #26368#24378#20116#31508#36755#20837#27861 
      ParentFont = False 
      TabOrder = 0 
      DefaultFont.Charset = DEFAULT_CHARSET 
      DefaultFont.Color = clWindowText 
      DefaultFont.Height = 14 
      DefaultFont.Name = 'Arial' 
      DefaultFont.Style = [] 
      UseSkinFont = True 
      BitMapBG = False 
      VScrollBar = spSkinScrollBar15 
      SkinDataName = 'memo' 
      Transparent = False 
      AlphaBlendValue = 0 
    end 
    object spSkinScrollBar15: TspSkinScrollBar 
      Left = 326 
      Top = 1 
      Width = 17 
      Height = 156 
      TabOrder = 1 
      DrawDefault = True 
      SkinData = HgzVip.spSkinData1 
      SkinDataName = 'vscrollbar' 
      AlphaBlend = False 
      AlphaBlendValue = 200 
      UseSkinCursor = False 
      DefaultFont.Charset = DEFAULT_CHARSET 
      DefaultFont.Color = clWindowText 
      DefaultFont.Height = 14 
      DefaultFont.Name = 'Arial' 
      DefaultFont.Style = [] 
      UseSkinFont = True 
      DefaultWidth = 0 
      DefaultHeight = 0 
      Both = False 
      BothMarkerWidth = 0 
      BothSkinDataName = 'bothhscrollbar' 
      CanFocused = False 
      Align = alRight 
      Kind = sbVertical 
      PageSize = 0 
      Min = 0 
      Max = 0 
      Position = 0 
      SmallChange = 1 
      LargeChange = 1 
    end 
  end 
  object DSF: TspDynamicSkinForm 
    ClientWidth = 0 
    ClientHeight = 0 
    HideCaptionButtons = False 
    AlwaysShowInTray = False 
    LogoBitMapTransparent = False 
    AlwaysMinimizeToTray = False 
    UseSkinFontInMenu = True 
    ShowIcon = False 
    MaximizeOnFullScreen = False 
    SkinHint = HgzVip.spSkinHint1 
    ShowObjectHint = False 
    UseSkinCursors = False 
    DefCaptionFont.Charset = DEFAULT_CHARSET 
    DefCaptionFont.Color = clBtnText 
    DefCaptionFont.Height = 14 
    DefCaptionFont.Name = 'Arial' 
    DefCaptionFont.Style = [fsBold] 
    DefInActiveCaptionFont.Charset = DEFAULT_CHARSET 
    DefInActiveCaptionFont.Color = clBtnShadow 
    DefInActiveCaptionFont.Height = 14 
    DefInActiveCaptionFont.Name = 'Arial' 
    DefInActiveCaptionFont.Style = [fsBold] 
    DefMenuItemHeight = 20 
    DefMenuItemFont.Charset = DEFAULT_CHARSET 
    DefMenuItemFont.Color = clWindowText 
    DefMenuItemFont.Height = 14 
    DefMenuItemFont.Name = 'Arial' 
    DefMenuItemFont.Style = [] 
    UseDefaultSysMenu = True 
    SupportNCArea = True 
    AlphaBlendAnimation = False 
    AlphaBlendValue = 0 
    AlphaBlend = False 
    MenusAlphaBlend = False 
    MenusAlphaBlendAnimation = False 
    MenusAlphaBlendValue = 200 
    SkinData = HgzVip.spSkinData1 
    MinHeight = 200 
    MinWidth = 200 
    Sizeable = False 
    DraggAble = False 
    Magnetic = True 
    MagneticSize = 10 
    BorderIcons = [biSystemMenu, biMinimize, biRollUp] 
    Left = 356 
  end 
  object FtpServer1: TFtpServer 
    Addr = '0.0.0.0' 
    Port = 'ftp' 
    Banner = '220 www.huigezi.net' 
    UserData = 0 
    MaxClients = 100 
    OnStart = FtpServer1Start 
    OnStop = FtpServer1Stop 
    OnAuthenticate = FtpServer1Authenticate 
    OnClientDisconnect = FtpServer1ClientDisconnect 
    OnClientConnect = FtpServer1ClientConnect 
    OnClientCommand = FtpServer1ClientCommand 
    OnChangeDirectory = FtpServer1ChangeDirectory 
    Left = 168 
    Top = 36 
  end 
end