inherited PackageOleControlInst: TPackageOleControlInst Width = 447 Height = 351 Caption = 'Import ActiveX' OnShow = PageShow object Bevel1: TBevel Left = 8 Top = 8 Width = 349 Height = 335 Shape = bsFrame end object Bevel2: TBevel Left = 16 Top = 130 Width = 331 Height = 17 end object Location: TLabel Left = 20 Top = 132 Width = 323 Height = 13 AutoSize = False Caption = 'Location' end object Label3: TLabel Left = 16 Top = 191 Width = 62 Height = 13 Caption = '&Class names:' FocusControl = ClassNames end object Label4: TLabel Left = 16 Top = 253 Width = 63 Height = 13 Caption = '&Palette page:' FocusControl = PageNames end object Label2: TLabel Left = 16 Top = 283 Width = 65 Height = 13 Caption = 'Unit &dir name:' FocusControl = UnitDirName end object Label5: TLabel Left = 16 Top = 313 Width = 61 Height = 13 Caption = '&Search path:' FocusControl = EditSearchPath end object ControlList: TListBox Left = 16 Top = 32 Width = 331 Height = 95 ItemHeight = 13 Sorted = True TabOrder = 0 TabWidth = 100 OnClick = ControlListClick end object RegisterButton: TButton Left = 187 Top = 153 Width = 75 Height = 25 Caption = '&Add..' TabOrder = 1 OnClick = RegisterButtonClick end object UnregisterButton: TButton Left = 272 Top = 153 Width = 75 Height = 25 Caption = '&Remove' TabOrder = 2 OnClick = UnregisterButtonClick end object ClassNames: TMemo Left = 88 Top = 188 Width = 217 Height = 53 Lines.Strings = ( '') ScrollBars = ssVertical TabOrder = 3 WantReturns = False WordWrap = False OnKeyPress = ClassNamesKeyPress end object UnitDirName: TEdit Left = 88 Top = 280 Width = 235 Height = 21 TabOrder = 5 OnChange = EditChange end object BrowseButton: TButton Left = 327 Top = 279 Width = 20 Height = 23 Caption = '...' TabOrder = 6 OnClick = BrowseButtonClick end object EditSearchPath: TEdit Left = 88 Top = 310 Width = 235 Height = 21 TabOrder = 7 OnChange = EditChange end object PageNames: TComboBox Left = 88 Top = 250 Width = 150 Height = 21 ItemHeight = 13 TabOrder = 4 end object SelectDir: TButton Left = 327 Top = 309 Width = 20 Height = 23 Caption = '...' TabOrder = 8 OnClick = SelectDirClick end object ControlNameDialog: TOpenDialog DefaultExt = 'ocx' Filter = 'ActiveX control (*.ocx)|*.ocx|Any file (*.*)|*.*' Title = 'Register OLE Control' Left = 56 Top = 48 end object UnitNameDialog: TSaveDialog DefaultExt = 'pas' Filter = 'Source file (*.pas)|*.pas|Any file (*.*)|*.*' Title = 'Unit directory name' Left = 144 Top = 48 end end