Mundo do CD-ROM 12/CDROM12.iso/internet/enigma/_setup.1/Enigma.exe/0/RCDATA/TSDIAPPFORM/TSDIAPPFORM.txt

Text File | 1997-06-18 | 28.6 KB | 1,275 lines

object SDIAppForm: TSDIAppForm
  Left = 190
  Top = 110
  Width = 492
  Height = 345
  ActiveControl = SpeedPanel
  Caption = 'Enigma'
  Color = clBlack
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object SpeedPanel: TPanel
    Left = 0
    Top = 0
    Width = 484
    Height = 30
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object OpenBtn: TSpeedButton
      Left = 25
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Abrir|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
        07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
        0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
      OnClick = OpenItemClick
    end
    object SaveBtn: TSpeedButton
      Left = 49
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Codificar Como|'
      Enabled = False
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
        7700333333337777777733333333008088003333333377F73377333333330088
        88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
        000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
        FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
        99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
      OnClick = SaveItemClick
    end
    object ExitBtn: TSpeedButton
      Left = 139
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Sair|'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F33330000000000033333777777777773330000}
      NumGlyphs = 2
      OnClick = ExitItemClick
    end
    object SpeedButton1: TSpeedButton
      Left = 73
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Chave|'
      Enabled = False
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5000555555555555577755555555555550B0555555555555F7F7555555555550
        00B05555555555577757555555555550B3B05555555555F7F557555555555000
        3B0555555555577755755555555500B3B0555555555577555755555555550B3B
        055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05
        555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555
        55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055
        555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755
        55555575FFFF77555555555700007555555555577777755555550000}
      NumGlyphs = 2
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 1
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Novo|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 96
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Imprimir|'
      Enabled = False
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 168
      Top = 0
      Width = 25
      Height = 28
      Hint = 'Help|'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
        33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
        FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
        FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
        FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
        FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
        FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
        3333333773FFFF77333333333FBFBF33333333333777773333330000}
      NumGlyphs = 2
      OnClick = SpeedButton4Click
    end
    object Label5: TLabel
      Left = 224
      Top = 8
      Width = 4
      Height = 16
      Color = clGreen
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'System'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Visible = False
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 280
    Width = 484
    Height = 19
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Panels = <>
    ParentFont = False
    SimplePanel = True
  end
  object Panel1: TPanel
    Left = 0
    Top = 248
    Width = 484
    Height = 32
    Align = alBottom
    TabOrder = 2
    object Gauge1: TGauge
      Left = 120
      Top = 12
      Width = 273
      Height = 9
      Hint = 'O Arquivo ser� Eliminado em 3 minutos'
      ShowText = False
      ForeColor = clRed
      BackColor = clYellow
      Progress = 0
      Visible = False
    end
    object CheckBox1: TCheckBox
      Left = 16
      Top = 8
      Width = 97
      Height = 17
      Caption = 'Auto-Destroi'
      Color = clBtnFace
      Enabled = False
      ParentColor = False
      TabOrder = 0
      Visible = False
    end
    object BitBtn2: TBitBtn
      Left = 400
      Top = 8
      Width = 75
      Height = 17
      Hint = 'Elimina Arquivo|'
      Caption = 'Destruir'
      Enabled = False
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'System'
      Font.Style = [fsBold]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      Visible = False
      OnClick = BitBtn2Click
    end
  end
  object Panel2: TPanel
    Left = 8
    Top = 96
    Width = 425
    Height = 97
    BevelOuter = bvNone
    Color = clBlack
    Font.Color = clGreen
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    Visible = False
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 84
      Height = 17
      Caption = 'Identificador:'
    end
    object Label2: TLabel
      Left = 44
      Top = 48
      Width = 45
      Height = 16
      Caption = 'Chave:'
    end
    object Label3: TLabel
      Left = 320
      Top = 48
      Width = 96
      Height = 16
      Caption = 'Chave Errada !'
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'System'
      Font.Style = [fsBold]
      ParentFont = False
      Visible = False
    end
    object Edit1: TEdit
      Left = 96
      Top = 8
      Width = 321
      Height = 24
      Hint = 'Digite a Frase Identificadora da Chave'
      Color = clBlack
      Ctl3D = True
      ParentCtl3D = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnExit = Edit1Exit
    end
    object Edit2: TEdit
      Left = 96
      Top = 48
      Width = 121
      Height = 24
      Hint = 'Digite a Chave'
      Color = clBlack
      Ctl3D = True
      ParentCtl3D = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnExit = Edit2Exit
    end
    object BitBtn1: TBitBtn
      Left = 232
      Top = 48
      Width = 75
      Height = 17
      Caption = 'Ok'
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object BitBtn3: TBitBtn
      Left = 232
      Top = 72
      Width = 75
      Height = 17
      Caption = 'Cancela'
      Enabled = False
      TabOrder = 3
      OnClick = BitBtn3Click
    end
  end
  object Memo1: TMemo
    Left = 0
    Top = 30
    Width = 484
    Height = 197
    Hint = 'Escreva o Texto'
    Align = alClient
    Lines.Strings = (
      '       ENIGMA'
      ''
      'Permite que voc� '
      'mande'
      'mensagens '
      'confidenciais'
      'cifradas pela '
      'InterNet'
      'ou arquive com'
      'seguran�a '
      'informa��es'
      'sigilosas.')
    ScrollBars = ssVertical
    TabOrder = 4
    Visible = False
  end
  object Panel3: TPanel
    Left = 1
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Color = clBlack
    TabOrder = 5
    Visible = False
    object Shape1: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape2: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape3: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape4: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape5: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape6: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape7: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape8: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
    end
    object Shape9: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape10: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape11: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape12: TShape
      Left = 40
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape13: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape14: TShape
      Left = 32
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape15: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object Panel4: TPanel
    Left = 81
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Caption = 'Panel4'
    Color = clBlack
    TabOrder = 6
    Visible = False
    object Shape16: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape17: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape18: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape19: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape20: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape21: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape22: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape23: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundRect
    end
    object Shape24: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape25: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape26: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape27: TShape
      Left = 48
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape28: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape29: TShape
      Left = 40
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape30: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object Panel5: TPanel
    Left = 0
    Top = 227
    Width = 484
    Height = 21
    Align = alBottom
    BevelOuter = bvNone
    Color = clBlack
    TabOrder = 7
    object Label4: TLabel
      Left = 72
      Top = 0
      Width = 281
      Height = 26
      Alignment = taCenter
      Caption = 'O Arquivo ser� eliminado em 3 minutos'
      Font.Color = clYellow
      Font.Height = -13
      Font.Name = 'Arial Black'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
  end
  object Panel6: TPanel
    Left = 161
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Caption = 'Panel4'
    Color = clBlack
    TabOrder = 8
    Visible = False
    object Shape31: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape32: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape33: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape34: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape35: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape36: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape37: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape38: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundRect
    end
    object Shape39: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape40: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape41: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape42: TShape
      Left = 40
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape43: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape44: TShape
      Left = 32
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape45: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object Panel7: TPanel
    Left = 241
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Caption = 'Panel4'
    Color = clBlack
    TabOrder = 9
    Visible = False
    object Shape46: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape47: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape48: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape49: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape50: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape51: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape52: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape53: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundRect
    end
    object Shape54: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape55: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape56: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape57: TShape
      Left = 40
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape58: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape59: TShape
      Left = 32
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape60: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object Panel8: TPanel
    Left = 321
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Caption = 'Panel4'
    Color = clBlack
    TabOrder = 10
    Visible = False
    object Shape61: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape62: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape63: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape64: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape65: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape66: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape67: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape68: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundRect
    end
    object Shape69: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape70: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape71: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape72: TShape
      Left = 40
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape73: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape74: TShape
      Left = 32
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape75: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object Panel9: TPanel
    Left = 401
    Top = 89
    Width = 81
    Height = 121
    BevelOuter = bvNone
    Caption = 'Panel4'
    Color = clBlack
    TabOrder = 11
    Visible = False
    object Shape76: TShape
      Left = 8
      Top = 8
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape77: TShape
      Left = 8
      Top = 104
      Width = 65
      Height = 9
      Brush.Color = clRed
    end
    object Shape78: TShape
      Left = 8
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape79: TShape
      Left = 64
      Top = 16
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape80: TShape
      Left = 8
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape81: TShape
      Left = 64
      Top = 64
      Width = 9
      Height = 41
      Brush.Color = clRed
    end
    object Shape82: TShape
      Left = 8
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape83: TShape
      Left = 32
      Top = 56
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundRect
    end
    object Shape84: TShape
      Left = 24
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape85: TShape
      Left = 40
      Top = 32
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape86: TShape
      Left = 24
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape87: TShape
      Left = 40
      Top = 80
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape88: TShape
      Left = 48
      Top = 56
      Width = 25
      Height = 9
      Brush.Color = clRed
    end
    object Shape89: TShape
      Left = 32
      Top = 64
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
    object Shape90: TShape
      Left = 32
      Top = 48
      Width = 17
      Height = 9
      Brush.Color = clRed
      Shape = stRoundSquare
    end
  end
  object MainMenu: TMainMenu
    Left = 327
    Top = 6
    object FileMenu: TMenuItem
      Caption = '&Arquivo'
      ShortCut = 0
      object Novo1: TMenuItem
        Caption = '&Novo'
        ShortCut = 0
        OnClick = Novo1Click
      end
      object OpenItem: TMenuItem
        Caption = 'A&brir...'
        Hint = 'Open a file'
        ShortCut = 0
        OnClick = OpenItemClick
      end
      object SaveItem: TMenuItem
        Caption = '&Codificar Como...'
        Enabled = False
        Hint = 'Save current file'
        ShortCut = 0
        OnClick = SaveItemClick
      end
      object Imprimir1: TMenuItem
        Caption = 'I&mprimir '
        Enabled = False
        ShortCut = 0
        OnClick = Imprimir1Click
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object ExitItem: TMenuItem
        Caption = '&Sair'
        Hint = 'Exit application'
        ShortCut = 32856
        OnClick = ExitItemClick
      end
    end
    object Configurao1: TMenuItem
      Caption = 'Co&nfigura��o'
      ShortCut = 0
      object ConfigurarImpressora1: TMenuItem
        Caption = 'Configurar &Impressora'
        ShortCut = 0
        OnClick = ConfigurarImpressora1Click
      end
      object ConfigurarFonte1: TMenuItem
        Caption = 'Configurar &Fonte'
        ShortCut = 0
        OnClick = ConfigurarFonte1Click
      end
    end
    object Help1: TMenuItem
      Caption = 'A&juda'
      ShortCut = 0
      object Help2: TMenuItem
        Caption = '&Help'
        ShortCut = 112
        OnClick = Help2Click
      end
      object About1: TMenuItem
        Caption = 'S&obre o Registro'
        ShortCut = 0
        OnClick = About1Click
      end
      object Registro1: TMenuItem
        Caption = '&Registro'
        ShortCut = 0
        OnClick = Registro1Click
      end
    end
  end
  object OpenDialog: TOpenDialog
    DefaultExt = 'eni'
    FileEditStyle = fsEdit
    Filter = 'Arquivos codificados|*.eni'
    Left = 359
    Top = 6
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'eni'
    FileEditStyle = fsEdit
    FileName = 'Novocod.eni'
    Filter = 'Arquivos codificados|*.eni'
    Left = 391
    Top = 6
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = Timer1Timer
    Left = 328
    Top = 40
  end
  object Timer2: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = Timer2Timer
    Left = 296
    Top = 40
  end
  object Timer3: TTimer
    Interval = 100
    OnTimer = Timer3Timer
    Left = 264
    Top = 40
  end
  object Timer4: TTimer
    Enabled = False
    OnTimer = Timer4Timer
    Left = 232
    Top = 40
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Device = fdBoth
    MinFontSize = 0
    MaxFontSize = 0
    OnApply = FontDialog1Apply
    Left = 424
    Top = 8
  end
  object PrintDialog1: TPrintDialog
    Left = 456
    Top = 8
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 200
    Top = 40
  end
end