home *** CD-ROM | disk | FTP | other *** search
- 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
-