object AddShellCommandDlg: TAddShellCommandDlg Left = 268 Top = 219 BorderStyle = bsToolWindow Caption = 'Add Shell Command' ClientHeight = 105 ClientWidth = 375 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 8 Width = 176 Height = 13 Caption = 'Menu name to display in popup menu' end object Label2: TLabel Left = 16 Top = 56 Width = 186 Height = 13 Caption = 'Parameter to pass on the command line' end object Label3: TLabel Left = 16 Top = 76 Width = 89 Height = 13 Caption = 'PathToApp + %1 +' end object MenuEdit: TEdit Left = 32 Top = 24 Width = 225 Height = 21 TabOrder = 0 OnChange = MenuEditChange end object ParamEdit: TEdit Left = 112 Top = 72 Width = 145 Height = 21 TabOrder = 1 OnChange = ParamEditChange OnKeyDown = ParamEditKeyDown end object Button1: TButton Left = 288 Top = 24 Width = 75 Height = 23 Caption = '&Ok' ModalResult = 1 TabOrder = 2 end object Button2: TButton Left = 288 Top = 56 Width = 75 Height = 23 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 3 end end