home *** CD-ROM | disk | FTP | other *** search
/ PC Open 19 / pcopen19.iso / Imag / IMAGINE / CUSTOM.Z / ALIGN.CLS < prev    next >
Encoding:
Text File  |  1997-04-22  |  459 b   |  25 lines
  1. VERSION 1.0 CLASS
  2. BEGIN
  3.   MultiUse = -1  'True
  4. END
  5. Attribute VB_Name = "clsAlign"
  6. Attribute VB_Creatable = True
  7. Attribute VB_Exposed = True
  8. Attribute VB_Description = "Align objects in a select set\\nAlign"
  9. Option Explicit
  10.  
  11. Sub Command_Initialize(BasicCmd As Object)
  12.     Set f.igCommand1.Command = BasicCmd
  13.  
  14. End Sub
  15.  
  16. Private Sub Class_Initialize()
  17.     Set f = New frmAlign
  18. End Sub
  19.  
  20.  
  21. Private Sub Class_Terminate()
  22.     Unload f
  23. End Sub
  24.  
  25.