VERSION 5.00 Begin VB.Form frmInfo BorderStyle = 1 'Fixed Single Caption = "Load File" ClientHeight = 4890 ClientLeft = 45 ClientTop = 330 ClientWidth = 3165 ClipControls = 0 'False LinkTopic = "Form1" MaxButton = 0 'False MinButton = 0 'False NegotiateMenus = 0 'False ScaleHeight = 4890 ScaleWidth = 3165 StartUpPosition = 3 'Windows Default Begin VB.TextBox LoadTime Height = 285 Left = 1905 TabIndex = 24 Top = 4350 Width = 1020 End Begin VB.TextBox Arrays Height = 285 Left = 2265 TabIndex = 23 Top = 3825 Width = 660 End Begin VB.TextBox Includes Height = 285 Left = 2265 TabIndex = 21 Top = 3465 Width = 660 End Begin VB.TextBox GrammarDefs Height = 285 Left = 2265 TabIndex = 19 Top = 3105 Width = 660 End Begin VB.TextBox Procedures Height = 285 Left = 2265 TabIndex = 17 Top = 2745 Width = 660 End Begin VB.TextBox Objects Height = 285 Left = 2265 TabIndex = 15 Top = 2385 Width = 660 End Begin VB.TextBox Classes Height = 285 Left = 2265 TabIndex = 13 Top = 2025 Width = 660 End Begin VB.TextBox AttributeDefs Height = 285 Left = 2265 TabIndex = 11 Top = 1665 Width = 660 End Begin VB.TextBox PropertyDefs Height = 285 Left = 2265 TabIndex = 9 Top = 1305 Width = 660 End Begin VB.TextBox Globals Height = 285 Left = 2265 TabIndex = 7 Top = 945 Width = 660 End Begin VB.TextBox Constants Height = 285 Left = 2265 TabIndex = 5 Top = 585 Width = 660 End Begin VB.TextBox Release Height = 285 Left = 2655 TabIndex = 3 Top = 90 Width = 420 End Begin VB.TextBox Serial Height = 285 Left = 720 TabIndex = 1 Top = 90 Width = 1080 End Begin VB.Label Label13 Caption = "Seconds To Load" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 25 Top = 4395 Width = 1680 End Begin VB.Label Label12 Caption = "Arrays" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 22 Top = 3870 Width = 2025 End Begin VB.Label Label11 Caption = "Includes" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 20 Top = 3510 Width = 2025 End Begin VB.Label Label10 Caption = "Grammar Defs" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 18 Top = 3135 Width = 2025 End Begin VB.Label Label9 Caption = "Procedures" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 16 Top = 2790 Width = 2025 End Begin VB.Label Label8 Caption = "Objects" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 14 Top = 2430 Width = 2025 End Begin VB.Label Label7 Caption = "Classes" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 12 Top = 2070 Width = 2025 End Begin VB.Label Label6 Caption = "Attribute Defs" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 10 Top = 1710 Width = 2025 End Begin VB.Label Label5 Caption = "Property Defs" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 210 Left = 120 TabIndex = 8 Top = 1350 Width = 2025 End Begin VB.Label Label4 Caption = "Globals" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 180 Left = 120 TabIndex = 6 Top = 990 Width = 2025 End Begin VB.Label Label3 Caption = "Constants" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 180 Left = 120 TabIndex = 4 Top = 630 Width = 2025 End Begin VB.Label Label2 Caption = "Release" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 180 Left = 1860 TabIndex = 2 Top = 135 Width = 750 End Begin VB.Label Label1 Caption = "Serial" BeginProperty Font Name = "Verdana" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 180 Left = 105 TabIndex = 0 Top = 135 Width = 555 End End Attribute VB_Name = "frmInfo" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False ' ' INFORM.DLL ' ' infInform.cls - This is the MAIN class. Everything else is a class type definition ' ' The structure is as follows: ' ' - infInform ' - Properties ' - Modules Collection ' - Module ' - Enum ModuleDef ' - MAIN (only one allowed) ' - LIB_PARSER (only one allowed) ' - LIB_PARSERM (only one allowed) ' - LIB_VERBLIB (only one allowed) ' - LIB_VERBLIBM (only one allowed) ' - LIB_ENGLISH (only one allowed) ' - LIB_GRAMMAR (only one allowed) ' - LIB_LINKLPA (only one allowed) ' - LIB_LINKLV (only one allowed) ' - USER_DEFINED (limited by Inform itself at compiler time) ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - MType As ModuleDef ' - Constants Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Constant Type ' - ENum CTypeDef ' - STRING ' - NUMERIC ' - IDENTIFIER ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - CType As CTypeDef ' - Value ' - Globals Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Global Type ' - ENum GTypeDef ' - STRING ' - NUMERIC ' - IDENTIFIER ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - GType As GTypeDef ' - Value ' - PropertyDefs Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - PropertyDef Type ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - AttributeDefs Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - AttributeDef Type ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Procedures Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Procedure Type ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Arguments Collection ' - Argument Type ' - Name ' - Code ' - Classes Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Object Type (see Objects Collection) ' - Objects Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Object Type ' - Name ' - ClassName ' - ParentName ' - ShortName ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Attributes Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Attribute Type ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Value (true or false) ' - Properties Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Property Type ' - Enum ModeDef ' - STRING ' - STRING_ARRAY ' - NUMERIC ' - NUMERIC_ARRAY ' - IDENTIFIER ' - IDENTIFIER_ARRAY ' - PROCEDURE ' - Name ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Mode As ModeDef ' - Code ' - Grammar ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - GrammarDef Type ' - Enum GTypeDef ' - VERB ' - EXTEND ' - GType As GTypeDef ' - Phrase Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Phrase Type ' - ' - Comments Collection ' - Add Method ' - Remove Method ' - Count Property ' - Item Property (default) ' - Comment Type ' - Text ' - Methods ' - ReadFromInform(filename) ' - SaveToInform(optional filename) MAIN Module name is the default filename + .inf ' - Clear (wipes the Inform object clean) '