object NewInterfaceProcedure: TNewInterfaceProcedure Left = 300 Top = 209 BorderStyle = bsDialog Caption = 'Add To Interface' ClientHeight = 131 ClientWidth = 433 Color = clBtnFace ParentFont = True OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 417 Height = 73 Shape = bsFrame end object Label1: TLabel Left = 16 Top = 24 Width = 45 Height = 13 Caption = 'Interface:' end object Label2: TLabel Left = 16 Top = 52 Width = 57 Height = 13 Caption = 'Declaration:' end object SyntaxHelp: TLabel Left = 108 Top = 69 Width = 54 Height = 13 Caption = 'SyntaxHelp' Color = clInfoBk Font.Charset = DEFAULT_CHARSET Font.Color = clInfoText Font.Height = -11 Font.Name = 'default' Font.Style = [] ParentColor = False ParentFont = False Visible = False end object SyntaxBox: TShape Left = 106 Top = 68 Width = 56 Height = 15 Brush.Style = bsClear Visible = False end object ProcType: TComboBox Left = 104 Top = 16 Width = 313 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( '') TabOrder = 1 end object Declaration: TEdit Left = 104 Top = 44 Width = 313 Height = 21 ParentShowHint = False ShowHint = False TabOrder = 0 OnChange = DeclarationChange OnKeyPress = DeclarationKeyPress end object OKButton: TButton Left = 192 Top = 90 Width = 75 Height = 25 Caption = 'OK' Default = True TabOrder = 2 OnClick = OKButtonClick end object CancelButton: TButton Left = 271 Top = 90 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object HelpButton: TButton Left = 351 Top = 90 Width = 75 Height = 25 Caption = '&Help' TabOrder = 4 OnClick = HelpButtonClick end object SyntaxHelpToggle: TCheckBox Left = 16 Top = 96 Width = 97 Height = 17 Caption = 'Syntax Helper' Checked = True State = cbChecked TabOrder = 5 OnClick = SyntaxHelpToggleClick end end