home *** CD-ROM | disk | FTP | other *** search
/ Hot Shareware 35 / hot35.iso / ficheros / LVB / MCSEC205.ZIP / MCSECURE.FRM < prev    next >
Text File  |  1998-05-02  |  2KB  |  107 lines
  1. VERSION 4.00
  2. Begin VB.MDIForm frmSecurity 
  3.    AutoShowChildren=   0   'False
  4.    BackColor       =   &H8000000C&
  5.    Caption         =   "MC SECURITY"
  6.    ClientHeight    =   7500
  7.    ClientLeft      =   1230
  8.    ClientTop       =   1965
  9.    ClientWidth     =   11985
  10.    Height          =   8190
  11.    Icon            =   "MCSECURE.frx":0000
  12.    Left            =   1170
  13.    LinkTopic       =   "MDIForm1"
  14.    Top             =   1335
  15.    Width           =   12105
  16.    Begin VB.Menu mnu_Serialization 
  17.       Caption         =   "&Serialization"
  18.    End
  19.    Begin VB.Menu mnu_HashCoding 
  20.       Caption         =   "&Hash"
  21.    End
  22.    Begin VB.Menu mnu_RegistrationKey 
  23.       Caption         =   "&Registration key"
  24.    End
  25.    Begin VB.Menu mnu_Encryption 
  26.       Caption         =   "&Encryption"
  27.    End
  28.    Begin VB.Menu mnu_Crc 
  29.       Caption         =   "&Crc"
  30.    End
  31.    Begin VB.Menu mnu_GZIP 
  32.       Caption         =   "&GZip"
  33.    End
  34.    Begin VB.Menu mnu_Ruby 
  35.       Caption         =   "&Ruby Mark 5"
  36.    End
  37.    Begin VB.Menu mnu_Exit 
  38.       Caption         =   "&Exit"
  39.    End
  40.    Begin VB.Menu mnu_About 
  41.       Caption         =   "&About"
  42.       WindowList      =   -1  'True
  43.       Begin VB.Menu mnu_Dummy1 
  44.          Caption         =   "MC SECURITY"
  45.       End
  46.    End
  47. End
  48. Attribute VB_Name = "frmSecurity"
  49. Attribute VB_Creatable = False
  50. Attribute VB_Exposed = False
  51. Option Explicit
  52.  
  53.  
  54.  
  55.  
  56. Private Sub MDIForm_Load()
  57.    mnu_About.Caption = Chr$(8) & mnu_About.Caption
  58. End Sub
  59.  
  60.  
  61. Private Sub mnu_Crc_Click()
  62.    Load frmCrc
  63.    frmCrc.Show
  64. End Sub
  65.  
  66. Private Sub mnu_Dummy1_Click()
  67.    Load frmAbout
  68.    frmAbout.Show
  69. End Sub
  70.  
  71. Private Sub mnu_Encryption_Click()
  72.    Load frmEncryption
  73.    frmEncryption.Show
  74. End Sub
  75.  
  76. Private Sub mnu_Exit_Click()
  77.    Unload Me
  78. End Sub
  79.  
  80. Private Sub mnu_GZIP_Click()
  81.    Load frmGZip
  82.    frmGZip.Show
  83. End Sub
  84.  
  85. Private Sub mnu_HashCoding_Click()
  86.    Load frmHashCoding
  87.    frmHashCoding.Show
  88. End Sub
  89.  
  90.  
  91. Private Sub mnu_RegistrationKey_Click()
  92.    Load frmRegistrationKey
  93.    frmRegistrationKey.Show
  94. End Sub
  95.  
  96. Private Sub mnu_Ruby_Click()
  97.    Load frmRuby
  98.    frmRuby.Show
  99. End Sub
  100.  
  101. Private Sub mnu_Serialization_Click()
  102.    Load frmSerialization
  103.    frmSerialization.Show
  104. End Sub
  105.  
  106.  
  107.