PC World 1999 April/PCWorld_1999-04_cd.bin/Software/TemaCD/GoldHTML/Golden.exe/0/RCDATA/TFTPFORM/TFTPFORM.txt

Text File | 1998-04-04 | 6.5 KB | 293 lines

object FTPForm: TFTPForm
  Left = 205
  Top = 182
  BorderStyle = bsDialog
  Caption = 'Upload'
  ClientHeight = 319
  ClientWidth = 558
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 282
    Top = 0
    Width = 3
    Height = 319
    Cursor = crHSplit
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 282
    Height = 319
    Align = alLeft
    TabOrder = 0
    object Panel5: TPanel
      Left = 1
      Top = 287
      Width = 280
      Height = 31
      Align = alBottom
      TabOrder = 0
      object CheckBox1: TCheckBox
        Left = 5
        Top = 7
        Width = 161
        Height = 17
        Caption = 'Upload v�etn� podadres���'
        State = cbChecked
        TabOrder = 0
      end
      object Button5: TButton
        Left = 201
        Top = 4
        Width = 75
        Height = 25
        Cancel = True
        Caption = 'Zav��t'
        ModalResult = 2
        TabOrder = 1
      end
    end
    object Panel6: TPanel
      Left = 1
      Top = 1
      Width = 280
      Height = 32
      Align = alTop
      TabOrder = 1
      object Label2: TLabel
        Left = 8
        Top = 10
        Width = 89
        Height = 13
        Caption = 'Domovsk� adres��'
      end
      object DirectoryEdit1: TDirectoryEdit
        Left = 105
        Top = 5
        Width = 166
        Height = 21
        DirectInput = False
        GlyphKind = gkCustom
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555555555555555555555555555555555555555555555555555555555
          555555555555555555555555555555555555555FFFFFFFFFF555550000000000
          55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
          B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
          000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
          555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
          55555575FFF75555555555700007555555555557777555555555555555555555
          5555555555555555555555555555555555555555555555555555}
        NumGlyphs = 2
        TabOrder = 0
        OnChange = DirectoryEdit1Change
      end
    end
    object FileListBox1: TFileListBox
      Left = 1
      Top = 33
      Width = 280
      Height = 254
      Align = alClient
      FileType = [ftDirectory, ftNormal]
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ItemHeight = 16
      MultiSelect = True
      ParentFont = False
      ShowGlyphs = True
      TabOrder = 2
      OnDblClick = FileListBox1DblClick
    end
  end
  object Panel4: TPanel
    Left = 285
    Top = 0
    Width = 273
    Height = 319
    Align = alClient
    TabOrder = 1
    object Label1: TLabel
      Left = 31
      Top = 17
      Width = 31
      Height = 13
      Caption = 'Server'
    end
    object Label4: TLabel
      Left = 35
      Top = 39
      Width = 23
      Height = 13
      Caption = '��et'
    end
    object Label5: TLabel
      Left = 33
      Top = 64
      Width = 27
      Height = 13
      Caption = 'Heslo'
    end
    object Label6: TLabel
      Left = 185
      Top = 17
      Width = 19
      Height = 13
      Caption = 'Port'
    end
    object Label3: TLabel
      Left = 23
      Top = 87
      Width = 37
      Height = 13
      Caption = 'Adres��'
    end
    object HostNameEdit: TEdit
      Left = 64
      Top = 14
      Width = 105
      Height = 21
      Hint = 'Host where the file is located'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
    object UserNameEdit: TEdit
      Left = 64
      Top = 36
      Width = 201
      Height = 21
      Hint = 'User name used to log on the host'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      Text = 'anonymous'
    end
    object PassWordEdit: TEdit
      Left = 64
      Top = 60
      Width = 201
      Height = 21
      Hint = 'Password used to validate user access'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      Text = '[e-mail]'
    end
    object PortEdit: TEdit
      Left = 208
      Top = 13
      Width = 57
      Height = 21
      TabOrder = 1
      Text = 'ftp'
    end
    object Button1: TButton
      Left = 209
      Top = 112
      Width = 57
      Height = 25
      Caption = 'P�ipojit'
      TabOrder = 5
      OnClick = Button1Click
    end
    object DisplayMemo: TMemo
      Left = 1
      Top = 144
      Width = 271
      Height = 174
      Align = alBottom
      Color = clBtnFace
      ScrollBars = ssBoth
      TabOrder = 6
    end
    object SyncCheckBox: TCheckBox
      Left = 64
      Top = 112
      Width = 89
      Height = 17
      Caption = 'Synchronous'
      State = cbChecked
      TabOrder = 7
      Visible = False
    end
    object cbDisplay: TCheckBox
      Left = 64
      Top = 124
      Width = 97
      Height = 17
      Hint = 'Enable data display during file transfert'
      Caption = 'Display Data'
      ParentShowHint = False
      ShowHint = True
      State = cbChecked
      TabOrder = 8
      Visible = False
    end
    object HostFileEdit: TEdit
      Left = 64
      Top = 83
      Width = 201
      Height = 21
      TabOrder = 4
    end
    object Button2: TButton
      Left = 71
      Top = 112
      Width = 57
      Height = 25
      Caption = 'List'
      TabOrder = 9
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 132
      Top = 112
      Width = 57
      Height = 25
      Caption = 'Upload'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnClick = Button3Click
    end
  end
  object Button4: TButton
    Left = 296
    Top = 113
    Width = 56
    Height = 25
    Caption = 'CD'
    TabOrder = 2
    OnClick = Button4Click
  end
  object FtpClient1: TFtpClient
    Timeout = 15
    MultiThreaded = False
    Port = 'ftp'
    DisplayFlag = False
    Binary = True
    OnSessionClosed = FtpClient1SessionClosed
    OnRequestDone = FtpClient1RequestDone
    Left = 303
    Top = 162
  end
end