home *** CD-ROM | disk | FTP | other *** search
/ Online Praxis 1997 February / OP2_97.BIN / cd-rom / tools / email / pronto / family.z / FAMILY.exe / 0 / RCDATA / TATTACHFORM / TATTACHFORM.txt
Text File  |  1997-01-13  |  2KB  |  104 lines
  1. object AttachForm: TAttachForm
  2.   Left = 322
  3.   Top = 160
  4.   ActiveControl = FileEdit
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsNone
  7.   Caption = 'Pronto Family'
  8.   ClientHeight = 317
  9.   ClientWidth = 476
  10.   Font.Color = clBlack
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = [fsBold]
  14.   Position = poScreenCenter
  15.   Scaled = False
  16.   OnActivate = FormActivate
  17.   OnCreate = FormCreate
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object imgBackgr: TImage
  21.     Left = 0
  22.     Top = 0
  23.     Width = 468
  24.     Height = 317
  25.   end
  26.   object imgOk: TImage
  27.     Left = 355
  28.     Top = 211
  29.     Width = 97
  30.     Height = 41
  31.     Cursor = 18
  32.     OnMouseDown = imgOkMouseDown
  33.   end
  34.   object imgCancel: TImage
  35.     Left = 352
  36.     Top = 255
  37.     Width = 100
  38.     Height = 44
  39.     Cursor = 18
  40.     OnMouseDown = imgCancelMouseDown
  41.   end
  42.   object Label1: TLabel
  43.     Left = 30
  44.     Top = 22
  45.     Width = 172
  46.     Height = 29
  47.     Caption = 'Attach the file :'
  48.     Font.Color = clNavy
  49.     Font.Height = -24
  50.     Font.Name = 'MS Sans Serif'
  51.     Font.Style = [fsBold]
  52.     ParentFont = False
  53.     Transparent = True
  54.   end
  55.   object DirectoryListBox1: TDirectoryListBox
  56.     Left = 28
  57.     Top = 54
  58.     Width = 148
  59.     Height = 212
  60.     FileList = FileListBox1
  61.     IntegralHeight = True
  62.     ItemHeight = 16
  63.     TabOrder = 1
  64.   end
  65.   object DriveComboBox1: TDriveComboBox
  66.     Left = 29
  67.     Top = 274
  68.     Width = 148
  69.     Height = 19
  70.     TabOrder = 3
  71.     OnChange = DriveComboBox1Change
  72.   end
  73.   object FileEdit: TEdit
  74.     Left = 194
  75.     Top = 55
  76.     Width = 139
  77.     Height = 21
  78.     TabOrder = 0
  79.     Text = '*.*'
  80.     OnKeyPress = FileEditKeyPress
  81.   end
  82.   object FileListBox1: TFileListBox
  83.     Left = 194
  84.     Top = 86
  85.     Width = 139
  86.     Height = 183
  87.     FileEdit = FileEdit
  88.     ItemHeight = 13
  89.     TabOrder = 2
  90.   end
  91.   object FilterComboBox1: TFilterComboBox
  92.     Left = 195
  93.     Top = 273
  94.     Width = 140
  95.     Height = 21
  96.     FileList = FileListBox1
  97.     Filter = 
  98.       'All files (*.*)|*.*|Bitmap Files (*.bmp)|*.bmp|Sound Files (*.wa' +
  99.       'v)|*.wav|Video Files (*.avi)|*.avi|Text Files (*.txt, *.doc, *.w' +
  100.       'ri)|*.txt; *.doc; *.wri|Midi Files (*.mid)|*.mid'
  101.     TabOrder = 4
  102.   end
  103. end
  104.