object OleCtrlInstForm: TOleCtrlInstForm Left = 200 Top = 108 BorderStyle = bsDialog Caption = 'Import OLE Control' ClientHeight = 331 ClientWidth = 419 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy TextHeight = 13 object Bevel1: TBevel Left = 4 Top = 8 Width = 409 Height = 285 Shape = bsFrame end object Label1: TLabel Left = 16 Top = 15 Width = 94 Height = 13 Caption = 'Registered co&ntrols:' FocusControl = ControlList end object Label2: TLabel Left = 16 Top = 163 Width = 67 Height = 13 Caption = 'Unit &file name:' FocusControl = UnitFileName end object Label3: TLabel Left = 16 Top = 215 Width = 62 Height = 13 Caption = '&Class names:' end object Label4: TLabel Left = 16 Top = 189 Width = 63 Height = 13 Caption = '&Palette page:' FocusControl = PageName end object Bevel2: TBevel Left = 16 Top = 130 Width = 305 Height = 17 end object Location: TLabel Left = 20 Top = 132 Width = 297 Height = 13 AutoSize = False end object ControlList: TListBox Left = 16 Top = 32 Width = 305 Height = 95 ItemHeight = 13 Sorted = True TabOrder = 0 TabWidth = 100 OnClick = ControlListClick end object RegisterButton: TButton Left = 328 Top = 32 Width = 75 Height = 23 Caption = '&Register...' TabOrder = 1 OnClick = RegisterButtonClick end object UnregisterButton: TButton Left = 328 Top = 60 Width = 75 Height = 23 Caption = '&Unregister' TabOrder = 2 OnClick = UnregisterButtonClick end object UnitFileName: TEdit Left = 96 Top = 160 Width = 225 Height = 21 TabOrder = 3 end object PageName: TEdit Left = 96 Top = 186 Width = 225 Height = 21 TabOrder = 5 Text = 'OCX' end object BrowseButton: TButton Left = 328 Top = 159 Width = 75 Height = 23 Caption = '&Browse...' TabOrder = 4 OnClick = BrowseButtonClick end object OKButton: TButton Left = 176 Top = 301 Width = 75 Height = 23 Caption = 'OK' Default = True TabOrder = 7 OnClick = OKButtonClick end object CancelButton: TButton Left = 257 Top = 301 Width = 75 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 8 end object HelpButton: TButton Left = 338 Top = 301 Width = 75 Height = 23 Caption = '&Help' TabOrder = 9 OnClick = HelpButtonClick end object ClassNames: TMemo Left = 96 Top = 212 Width = 225 Height = 71 ScrollBars = ssVertical TabOrder = 6 WordWrap = False end object UnitNameDialog: TSaveDialog DefaultExt = 'pas' FileEditStyle = fsEdit Filter = 'Source file (*.pas)|*.pas|Any file (*.*)|*.*' Options = [ofHideReadOnly] Title = 'Unit file name' Left = 40 Top = 296 end object ControlNameDialog: TOpenDialog DefaultExt = 'ocx' FileEditStyle = fsEdit Filter = 'OLE control (*.ocx)|*.ocx|Any file (*.*)|*.*' Options = [ofHideReadOnly] Title = 'Register OLE Control' Left = 8 Top = 296 end end