home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / tenpack.lzh / CRYPDEMO.DFM / CRYPDEMO.txt next >
Encoding:
Text File  |  1995-08-15  |  5.3 KB  |  202 lines
  1. object DemoCrypt: TDemoCrypt
  2.   Left = 78
  3.   Top = 70
  4.   BorderStyle = bsSingle
  5.   Caption = 'File Encryption Component'
  6.   ClientHeight = 361
  7.   ClientWidth = 477
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Icon.Data = {<image000.ico>}
  13.   PixelsPerInch = 96
  14.   Position = poScreenCenter
  15.   Visible = True
  16.   TextHeight = 16
  17.   object Label2: TLabel
  18.     Left = 118
  19.     Top = 9
  20.     Width = 63
  21.     Height = 16
  22.     Caption = 'Password:'
  23.     Font.Color = clBlack
  24.     Font.Height = -13
  25.     Font.Name = 'MS Sans Serif'
  26.     Font.Style = []
  27.     ParentFont = False
  28.   end
  29.   object Label1: TLabel
  30.     Left = 154
  31.     Top = 38
  32.     Width = 25
  33.     Height = 16
  34.     Caption = 'File:'
  35.     Font.Color = clBlack
  36.     Font.Height = -13
  37.     Font.Name = 'MS Sans Serif'
  38.     Font.Style = []
  39.     ParentFont = False
  40.   end
  41.   object Label3: TLabel
  42.     Left = 74
  43.     Top = 288
  44.     Width = 343
  45.     Height = 62
  46.     AutoSize = False
  47.     Caption = 
  48.       'Encrypt sensitive files with the File Encryption component.  Sup' +
  49.       'ply a password, call the CryptFile method and you'#39're done (and f' +
  50.       'ast too !).  To decrypt the file, call the CryptFile method a se' +
  51.       'cond time with the same password.'
  52.     Font.Color = clBlack
  53.     Font.Height = -11
  54.     Font.Name = 'MS Sans Serif'
  55.     Font.Style = [fsBold]
  56.     ParentFont = False
  57.   end
  58.   object DriveComboBox1: TDriveComboBox
  59.     Left = 45
  60.     Top = 68
  61.     Width = 145
  62.     Height = 22
  63.     DirList = DirectoryListBox1
  64.     Font.Color = clBlack
  65.     Font.Height = -13
  66.     Font.Name = 'MS Sans Serif'
  67.     Font.Style = []
  68.     ParentFont = False
  69.     TabOrder = 0
  70.   end
  71.   object DirectoryListBox1: TDirectoryListBox
  72.     Left = 45
  73.     Top = 93
  74.     Width = 145
  75.     Height = 68
  76.     FileList = FileListBox1
  77.     Font.Color = clBlack
  78.     Font.Height = -13
  79.     Font.Name = 'MS Sans Serif'
  80.     Font.Style = []
  81.     ItemHeight = 16
  82.     ParentFont = False
  83.     TabOrder = 1
  84.   end
  85.   object FileListBox1: TFileListBox
  86.     Left = 45
  87.     Top = 164
  88.     Width = 145
  89.     Height = 119
  90.     FileEdit = Edit1
  91.     Font.Color = clBlack
  92.     Font.Height = -13
  93.     Font.Name = 'MS Sans Serif'
  94.     Font.Style = []
  95.     ItemHeight = 16
  96.     ParentFont = False
  97.     TabOrder = 2
  98.   end
  99.   object Memo1: TMemo
  100.     Left = 194
  101.     Top = 94
  102.     Width = 269
  103.     Height = 189
  104.     Font.Color = clBlack
  105.     Font.Height = -13
  106.     Font.Name = 'MS Sans Serif'
  107.     Font.Style = []
  108.     Lines.Strings = (
  109.       'Memo1')
  110.     ParentFont = False
  111.     ScrollBars = ssBoth
  112.     TabOrder = 3
  113.   end
  114.   object Edit1: TEdit
  115.     Left = 184
  116.     Top = 35
  117.     Width = 173
  118.     Height = 24
  119.     Font.Color = clBlack
  120.     Font.Height = -13
  121.     Font.Name = 'MS Sans Serif'
  122.     Font.Style = []
  123.     ParentFont = False
  124.     ReadOnly = True
  125.     TabOrder = 4
  126.     Text = '*.*'
  127.   end
  128.   object Edit2: TEdit
  129.     Left = 184
  130.     Top = 8
  131.     Width = 173
  132.     Height = 24
  133.     Font.Color = clBlack
  134.     Font.Height = -13
  135.     Font.Name = 'MS Sans Serif'
  136.     Font.Style = []
  137.     ParentFont = False
  138.     TabOrder = 5
  139.   end
  140.   object BitBtn1: TBitBtn
  141.     Left = 373
  142.     Top = 7
  143.     Width = 89
  144.     Height = 24
  145.     Caption = '&Encrypt'
  146.     Font.Color = clBlack
  147.     Font.Height = -13
  148.     Font.Name = 'MS Sans Serif'
  149.     Font.Style = []
  150.     ParentFont = False
  151.     TabOrder = 6
  152.     OnClick = BitBtn1Click
  153.     Glyph.Data = {
  154.       78010000424D7801000000000000760000002800000020000000100000000100
  155.       04000000000000000000120B0000120B00000000000000000000000000000000
  156.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  157.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
  158.       0EEE333377777777777733330FF00FBFB0EE33337F37733F377733330F0BFB0B
  159.       FB0E33337F73FF73337733330FF000BFBFB033337F377733333733330FFF0BFB
  160.       FBF033337FFF733F333733300000BF0FBFB03FF77777F3733F37000FBFB0F0FB
  161.       0BF077733FF7F7FF7337E0FB00000000BF0077F377777777F377E0BFBFBFBFB0
  162.       F0F077F3333FFFF7F737E0FBFB0000000FF077F3337777777337E0BFBFBFBFB0
  163.       FFF077F3333FFFF73FF7E0FBFB00000F000077FF337777737777E00FBFBFB0FF
  164.       0FF07773FFFFF7337F37003000000FFF0F037737777773337F7333330FFFFFFF
  165.       003333337FFFFFFF7733333300000000033333337777777773330000}
  166.     NumGlyphs = 2
  167.   end
  168.   object BitBtn2: TBitBtn
  169.     Left = 373
  170.     Top = 33
  171.     Width = 89
  172.     Height = 24
  173.     Caption = '&View'
  174.     Font.Color = clBlack
  175.     Font.Height = -13
  176.     Font.Name = 'MS Sans Serif'
  177.     Font.Style = []
  178.     ParentFont = False
  179.     TabOrder = 7
  180.     OnClick = BitBtn2Click
  181.     Glyph.Data = {
  182.       76010000424D7601000000000000760000002800000020000000100000000100
  183.       04000000000000010000130B0000130B00000000000000000000000000000000
  184.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  185.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  186.       33033333333333333F7F3333333333333000333333333333F777333333333333
  187.       000333333333333F777333333333333000333333333333F77733333333333300
  188.       033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
  189.       33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
  190.       3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
  191.       33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
  192.       333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
  193.       333333773FF77333333333370007333333333333777333333333}
  194.     NumGlyphs = 2
  195.   end
  196.   object FileCrypt1: TFileCrypt
  197.     Retaindate = False
  198.     Left = 37
  199.     Top = 18
  200.   end
  201. end
  202.