object OpenFileDlg: TOpenFileDlg Left = 264 Top = 136 ActiveControl = Combo BorderStyle = bsDialog Caption = 'Open file with' ClientHeight = 226 ClientWidth = 216 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy TextHeight = 13 object Label1: TLabel Left = 10 Top = 8 Width = 68 Height = 13 Caption = '&Program name' FocusControl = Combo end object OKBtn: TBitBtn Left = 52 Top = 192 Width = 77 Height = 27 TabOrder = 2 OnClick = OKBtnClick Kind = bkOK Margin = 4 Style = bsNew Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 132 Top = 192 Width = 77 Height = 27 TabOrder = 3 Kind = bkCancel Margin = 4 Style = bsNew Spacing = -1 IsControl = True end object Combo: TComboBox Left = 8 Top = 26 Width = 199 Height = 20 Cursor = crIBeam Hint = 'Double click to browse' ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 0 OnDblClick = ComboDblClick end object Listbox: TListBox Left = 8 Top = 54 Width = 199 Height = 131 ItemHeight = 13 TabOrder = 1 OnClick = ListboxClick end object OpenDialog: TOpenDialog Filter = 'All programs|*.exe *.com *.pif *.bat|Executable files|*.exe|PIF ' + 'files|*.pif|DOS commands|*.com|Batch files|*.bat|All files|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Select program' Left = 8 Top = 192 end end