object AutoObjectExpert: TAutoObjectExpert Left = 237 Top = 102 ActiveControl = NewClassName BorderStyle = bsDialog Caption = 'Automation Object Wizard' ClientHeight = 173 ClientWidth = 369 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 353 Height = 122 Shape = bsFrame end object Label1: TLabel Left = 20 Top = 23 Width = 93 Height = 16 Caption = '&Class Name:' FocusControl = NewClassName end object Label2: TLabel Left = 20 Top = 50 Width = 93 Height = 16 Caption = '&OLE Class Name:' FocusControl = OleClassName end object Label3: TLabel Left = 20 Top = 78 Width = 93 Height = 16 Caption = '&Description:' FocusControl = Description end object Label4: TLabel Left = 20 Top = 104 Width = 93 Height = 16 Caption = '&Instancing:' FocusControl = Instancing end object NewClassName: TEdit Left = 120 Top = 18 Width = 145 Height = 24 TabOrder = 0 OnChange = NewClassNameChange end object OKButton: TButton Left = 128 Top = 140 Width = 75 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 4 OnClick = OKButtonClick end object CancelButton: TButton Left = 207 Top = 140 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 end object HelpButton: TButton Left = 287 Top = 140 Width = 75 Height = 25 Caption = '&Help' TabOrder = 6 OnClick = HelpButtonClick end object OleClassName: TEdit Left = 120 Top = 45 Width = 145 Height = 24 TabOrder = 1 end object Description: TEdit Left = 120 Top = 72 Width = 225 Height = 24 TabOrder = 2 end object Instancing: TComboBox Left = 120 Top = 99 Width = 145 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Internal' 'Single Instance' 'Multiple Instance') TabOrder = 3 end end