home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 November / pcwk_11_98B.iso / Lotus / ITALIAN / LOTUS026.DSK / COLLAYS.TPL < prev    next >
Text File  |  1995-09-10  |  374b  |  13 lines

  1.     'Retrieve all of the layouts in this division
  2.     
  3.     Dim AllLayouts As LayoutCollection
  4.     Set AllLayouts = .Division.Foundry.Layouts
  5.     
  6.     Forall Layout In AllLayouts
  7.         Print "Info formato "
  8.         Print "Nome classe ",Layout.ClassName
  9.         Print "Nome ", Layout.Name
  10.         Print "Nome editor ", Layout.EditorName
  11.         Print "------------------------------------------"
  12.         
  13.     End Forall