home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2002 #8 / K-CD-8-2002.ISO / CyberBuddy / _SETUP.1 / CyberBud.exe / 0 / RCDATA / TFILETRANSFORM / TFILETRANSFORM.txt
Encoding:
Text File  |  2002-01-25  |  4.3 KB  |  215 lines
  1. object FileTransForm: TFileTransForm
  2.   Left = 363
  3.   Top = 154
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsToolWindow
  6.   Caption = 'File Transfer'
  7.   ClientHeight = 152
  8.   ClientWidth = 325
  9.   Color = clTeal
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   FormStyle = fsStayOnTop
  16.   OldCreateOrder = False
  17.   Position = poDefault
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object Label2: TLabel
  24.     Left = 233
  25.     Top = 1
  26.     Width = 85
  27.     Height = 13
  28.     Caption = 'Auto Accept From'
  29.     Font.Charset = DEFAULT_CHARSET
  30.     Font.Color = clWhite
  31.     Font.Height = -11
  32.     Font.Name = 'MS Sans Serif'
  33.     Font.Style = []
  34.     ParentFont = False
  35.   end
  36.   object Label3: TLabel
  37.     Left = 68
  38.     Top = 1
  39.     Width = 30
  40.     Height = 13
  41.     Caption = 'Status'
  42.     Font.Charset = DEFAULT_CHARSET
  43.     Font.Color = clWhite
  44.     Font.Height = -11
  45.     Font.Name = 'MS Sans Serif'
  46.     Font.Style = []
  47.     ParentFont = False
  48.     OnDblClick = Label3DblClick
  49.   end
  50.   object TypeSel: TRadioGroup
  51.     Left = 5
  52.     Top = 70
  53.     Width = 236
  54.     Height = 49
  55.     Caption = 'Select to'
  56.     Font.Charset = DEFAULT_CHARSET
  57.     Font.Color = clAqua
  58.     Font.Height = -11
  59.     Font.Name = 'MS Sans Serif'
  60.     Font.Style = [fsBold]
  61.     Items.Strings = (
  62.       'Send a File to'
  63.       'Receive a File From')
  64.     ParentFont = False
  65.     TabOrder = 8
  66.     OnClick = TypeSelClick
  67.   end
  68.   object Memo1: TMemo
  69.     Left = 6
  70.     Top = 13
  71.     Width = 151
  72.     Height = 53
  73.     Color = clSilver
  74.     Font.Charset = DEFAULT_CHARSET
  75.     Font.Color = clMaroon
  76.     Font.Height = -11
  77.     Font.Name = 'MS Sans Serif'
  78.     Font.Style = []
  79.     ParentFont = False
  80.     ReadOnly = True
  81.     ScrollBars = ssVertical
  82.     TabOrder = 0
  83.     OnDblClick = Memo1DblClick
  84.   end
  85.   object ReqSendBtn: TButton
  86.     Left = 5
  87.     Top = 126
  88.     Width = 112
  89.     Height = 22
  90.     Caption = 'Request to Send File'
  91.     TabOrder = 1
  92.     OnClick = ReqSendBtnClick
  93.   end
  94.   object SendFile: TEdit
  95.     Left = 117
  96.     Top = 125
  97.     Width = 205
  98.     Height = 21
  99.     Color = clAqua
  100.     TabOrder = 2
  101.     OnChange = SendFileChange
  102.   end
  103.   object SendUIN: TEdit
  104.     Left = 156
  105.     Top = 95
  106.     Width = 80
  107.     Height = 21
  108.     Color = 8454143
  109.     Font.Charset = DEFAULT_CHARSET
  110.     Font.Color = clBlack
  111.     Font.Height = -11
  112.     Font.Name = 'MS Sans Serif'
  113.     Font.Style = []
  114.     ParentFont = False
  115.     ReadOnly = True
  116.     TabOrder = 3
  117.   end
  118.   object BrowseBtn: TButton
  119.     Left = 275
  120.     Top = 110
  121.     Width = 48
  122.     Height = 17
  123.     Caption = 'Browse'
  124.     TabOrder = 4
  125.     OnClick = BrowseBtnClick
  126.   end
  127.   object AutoAcceptList: TListBox
  128.     Left = 254
  129.     Top = 14
  130.     Width = 67
  131.     Height = 85
  132.     Color = clLime
  133.     ItemHeight = 13
  134.     PopupMenu = PopupMenu1
  135.     TabOrder = 5
  136.   end
  137.   object CancelBtn: TButton
  138.     Left = 161
  139.     Top = 49
  140.     Width = 91
  141.     Height = 18
  142.     Caption = 'Cancel Request'
  143.     TabOrder = 6
  144.     OnClick = CancelBtnClick
  145.   end
  146.   object HelpBtn: TButton
  147.     Left = 186
  148.     Top = 5
  149.     Width = 34
  150.     Height = 18
  151.     Caption = 'Help'
  152.     TabOrder = 7
  153.     OnClick = HelpBtnClick
  154.   end
  155.   object NameBox: TEdit
  156.     Left = 156
  157.     Top = 77
  158.     Width = 80
  159.     Height = 21
  160.     Color = 12713921
  161.     Font.Charset = DEFAULT_CHARSET
  162.     Font.Color = clBlack
  163.     Font.Height = -11
  164.     Font.Name = 'MS Sans Serif'
  165.     Font.Style = []
  166.     ParentFont = False
  167.     ReadOnly = True
  168.     TabOrder = 9
  169.   end
  170.   object Button1: TButton
  171.     Left = 161
  172.     Top = 27
  173.     Width = 91
  174.     Height = 18
  175.     Caption = 'Received Files'
  176.     TabOrder = 10
  177.     OnClick = Button1Click
  178.   end
  179.   object FTP: TFtpClient
  180.     Timeout = 15
  181.     MultiThreaded = False
  182.     Port = 'ftp'
  183.     DisplayFileFlag = False
  184.     Binary = True
  185.     ShareMode = ftpShareExclusive
  186.     Options = [ftpAcceptLF]
  187.     ConnectionType = ftpDirect
  188.     OnDisplay = FTPDisplay
  189.     OnDisplayFile = FTPDisplayFile
  190.     OnCommand = FTPCommand
  191.     OnResponse = FTPResponse
  192.     OnProgress = FTPProgress
  193.     OnRequestDone = FTPRequestDone
  194.     OnStateChange = FTPStateChange
  195.     Left = 15
  196.     Top = 33
  197.   end
  198.   object OpenDialog1: TOpenDialog
  199.     Left = 18
  200.     Top = 3
  201.   end
  202.   object PopupMenu1: TPopupMenu
  203.     Left = 277
  204.     Top = 20
  205.     object AddUIN1: TMenuItem
  206.       Caption = 'Add UIN'
  207.       OnClick = AddUIN1Click
  208.     end
  209.     object DeleteUIN1: TMenuItem
  210.       Caption = 'Delete UIN'
  211.       OnClick = DeleteUIN1Click
  212.     end
  213.   end
  214. end
  215.