object NewProjDlg: TNewProjDlg Left = 813 Top = 108 HelpContext = 1022 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Create Project' ClientHeight = 288 ClientWidth = 445 Font.Height = -11 Font.Name = 'MS Sans Serif' FormStyle = fsStayOnTop PixelsPerInch = 96 Position = poScreenCenter OnCloseQuery = FormCloseQuery OnCreate = FormCreate TextHeight = 13 object OkButton: TBitBtn Left = 187 Top = 252 Width = 75 Height = 25 Hint = 'Add the Delphi project to version control' HelpContext = 1022 Caption = 'OK' Default = True ModalResult = 1 ParentShowHint = False ShowHint = False TabOrder = 0 NumGlyphs = 2 end object CancelButton: TBitBtn Left = 272 Top = 252 Width = 75 Height = 25 Hint = 'Dismiss the dialog without creating adding the project to versio' + 'n control' HelpContext = 1022 Cancel = True Caption = 'Cancel' ModalResult = 2 ParentShowHint = False ShowHint = False TabOrder = 1 NumGlyphs = 2 end object HelpButton: TBitBtn Left = 356 Top = 252 Width = 75 Height = 25 Hint = 'Get more detailed help' HelpContext = 1022 Caption = '&Help' ParentShowHint = False ShowHint = False TabOrder = 2 OnClick = HelpButtonClick NumGlyphs = 2 end object GroupBox2: TGroupBox Left = 13 Top = 15 Width = 419 Height = 100 HelpContext = 1022 Caption = 'Project Directories' TabOrder = 4 object BLabel: TLabel Left = 18 Top = 33 Width = 87 Height = 13 Caption = 'Workfile Directory:' end object Label1: TLabel Left = 18 Top = 64 Width = 84 Height = 13 Caption = 'Archive Directory:' end object WorkDir: TEdit Left = 128 Top = 29 Width = 187 Height = 20 Hint = 'Local directory for checked out files' HelpContext = 1019 ParentShowHint = False ShowHint = False TabOrder = 0 end object VCSDir: TEdit Left = 128 Top = 61 Width = 187 Height = 20 Hint = 'Directory in which to place archives' HelpContext = 1020 ParentShowHint = False ShowHint = False TabOrder = 1 end object BrowseWork: TBitBtn Left = 325 Top = 26 Width = 75 Height = 25 Hint = 'Find Private Directory' HelpContext = 1019 Caption = 'Browse' ParentShowHint = False ShowHint = False TabOrder = 2 OnClick = BrowseWorkDirsClick NumGlyphs = 2 end object BitBtn1: TBitBtn Left = 325 Top = 57 Width = 75 Height = 25 Hint = 'Find Archive Directory' HelpContext = 1020 Caption = 'Browse' ParentShowHint = False ShowHint = False TabOrder = 3 OnClick = BrowseVCSDirsClick NumGlyphs = 2 end end object GroupBox1: TGroupBox Left = 13 Top = 130 Width = 202 Height = 108 HelpContext = 1022 Caption = 'Project Options' TabOrder = 3 object Journal: TCheckBox Left = 17 Top = 19 Width = 108 Height = 17 Hint = 'Create a journal of version control activities in the project di' + 'rectory' HelpContext = 1022 Caption = 'Create Journal' ParentShowHint = False ShowHint = False State = cbChecked TabOrder = 0 end object WriteProtectArchives: TCheckBox Left = 17 Top = 48 Width = 153 Height = 17 Hint = 'Prevent archive files from being modified' HelpContext = 1022 Caption = 'Write Protect Archives' ParentShowHint = False ShowHint = False State = cbChecked TabOrder = 1 end object WriteProtectWorkfiles: TCheckBox Left = 17 Top = 76 Width = 153 Height = 17 Hint = 'prevent checked-in files from being modified inadvertantly' HelpContext = 1022 Caption = 'Write Protect Workfiles' ParentShowHint = False ShowHint = False State = cbChecked TabOrder = 2 end end object GroupBox3: TGroupBox Left = 228 Top = 129 Width = 204 Height = 109 HelpContext = 1022 Caption = 'Creation Options' TabOrder = 5 object AllFilesIn: TCheckBox Left = 18 Top = 20 Width = 141 Height = 17 Hint = 'Add all project files to version control' HelpContext = 1022 Caption = 'Check in All Files' ParentShowHint = False ShowHint = False State = cbChecked TabOrder = 0 OnClick = AllFilesInClick end object AllFilesLocked: TCheckBox Left = 18 Top = 49 Width = 145 Height = 17 Hint = 'Keep files locked after checking them in' HelpContext = 1022 Caption = 'Keep Files Locked' ShowHint = False State = cbChecked TabOrder = 1 end object PromptPlease: TCheckBox Left = 18 Top = 77 Width = 167 Height = 17 Hint = 'Prompt for a description of each file' HelpContext = 1022 Caption = 'Prompt for Descriptions' ParentShowHint = False ShowHint = False State = cbChecked TabOrder = 2 end end end