home *** CD-ROM | disk | FTP | other *** search
- object CorbaObjectExpert: TCorbaObjectExpert
- Left = 385
- Top = 247
- ActiveControl = NewClassName
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Corba Object Wizard'
- ClientHeight = 159
- ClientWidth = 366
- Color = clBtnFace
- ParentFont = True
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 353
- Height = 113
- Shape = bsFrame
- end
- object LblClassName: TLabel
- Left = 18
- Top = 22
- Width = 59
- Height = 13
- Caption = '&Class Name:'
- FocusControl = NewClassName
- end
- object Lblinstancing: TLabel
- Left = 18
- Top = 55
- Width = 52
- Height = 13
- Caption = '&Instancing:'
- FocusControl = Instancing
- end
- object LblThread: TLabel
- Left = 18
- Top = 87
- Width = 83
- Height = 13
- Caption = '&Threading Model:'
- FocusControl = ThreadModel
- end
- object NewClassName: TEdit
- Left = 112
- Top = 18
- Width = 241
- Height = 21
- TabOrder = 0
- end
- object OKButton: TButton
- Left = 128
- Top = 128
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 3
- OnClick = OKButtonClick
- end
- object CancelButton: TButton
- Left = 207
- Top = 128
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- end
- object HelpButton: TButton
- Left = 287
- Top = 128
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 5
- OnClick = HelpButtonClick
- end
- object Instancing: TComboBox
- Left = 112
- Top = 51
- Width = 241
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Shared instance'
- 'Instance-per-client')
- TabOrder = 1
- end
- object ThreadModel: TComboBox
- Left = 112
- Top = 83
- Width = 241
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Multithreaded'
- 'Single-threaded')
- TabOrder = 2
- end
- end
-