home *** CD-ROM | disk | FTP | other *** search
- inherited ComObjectExpert: TComObjectExpert
- Left = 206
- Top = 278
- ClientHeight = 272
- ClientWidth = 369
- ShowHint = True
- PixelsPerInch = 96
- TextHeight = 13
- inherited Bevel1: TBevel
- Height = 177
- end
- inherited Lblinstancing: TLabel
- Top = 54
- end
- object LblIntf: TLabel [3]
- Left = 18
- Top = 112
- Width = 63
- Height = 26
- Caption = 'Implemented Inter&faces:'
- Enabled = False
- FocusControl = ImplIntfs
- WordWrap = True
- end
- object LblDesc: TLabel [5]
- Left = 18
- Top = 151
- Width = 56
- Height = 13
- Caption = '&Description:'
- FocusControl = Description
- WordWrap = True
- end
- inherited NewClassName: TEdit
- Hint = 'Name of the object (COM Class) your server will expose'
- OnChange = NewClassNameChange
- end
- inherited OKButton: TButton
- Top = 240
- TabOrder = 6
- end
- inherited CancelButton: TButton
- Top = 240
- TabOrder = 7
- end
- inherited HelpButton: TButton
- Top = 240
- TabOrder = 8
- end
- inherited Instancing: TComboBox
- Top = 50
- end
- object ImplIntfs: TEdit [11]
- Left = 112
- Top = 115
- Width = 241
- Height = 21
- Hint =
- 'Interface(s) implemented by the CoClass. If you include a typeli' +
- 'brary, IDE generates a new default interface for your object'
- Enabled = False
- TabOrder = 3
- end
- object Description: TEdit
- Left = 112
- Top = 147
- Width = 241
- Height = 21
- Hint =
- 'String describing your CoClass; used when registering the object' +
- '.'
- TabOrder = 4
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 192
- Width = 353
- Height = 41
- Caption = ' Options '
- TabOrder = 5
- object cbIncludeTypeLib: TCheckBox
- Left = 8
- Top = 16
- Width = 121
- Height = 17
- Hint =
- 'IDE creates a new interface for your CoClass - otherwise, you mu' +
- 'st provide the definition of the implemented interface(s)'
- Caption = 'Include Type &Library'
- Checked = True
- State = cbChecked
- TabOrder = 0
- OnClick = cbIncludeTypeLibClick
- end
- object cbGenEvents: TCheckBox
- Left = 496
- Top = 192
- Width = 289
- Height = 25
- Caption = 'Generate &Event support code'
- Enabled = False
- TabOrder = 1
- end
- object cbMarkIntfOleAutomation: TCheckBox
- Left = 168
- Top = 16
- Width = 177
- Height = 17
- Hint = 'Allows TypeLibrary Marshalling, especially for InProc servers'
- Caption = 'Mark interface &Oleautomation'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- end
- end
-