object GetDlg: TGetDlg Left = 353 Top = 335 HelpContext = 1005 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Check Out' ClientHeight = 163 ClientWidth = 408 Font.Height = -11 Font.Name = 'MS Sans Serif' FormStyle = fsStayOnTop Position = poScreenCenter OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 11 Top = 9 Width = 88 Height = 13 Caption = 'Working Directory:' end object BrowseWorkDir: TBitBtn Left = 325 Top = 4 Width = 75 Height = 25 Hint = 'Find Private Directory' HelpContext = 1019 Caption = 'Browse' ParentShowHint = False ShowHint = False TabOrder = 2 OnClick = BrowseWorkDirsClick NumGlyphs = 2 end object WorkDir: TEdit Left = 108 Top = 6 Width = 207 Height = 21 TabOrder = 1 end object Panel1: TPanel Left = 0 Top = 34 Width = 408 Height = 129 Align = alBottom BevelOuter = bvNone TabOrder = 0 object OptionGroup: TGroupBox Left = 8 Top = 8 Width = 393 Height = 81 HelpContext = 1005 Caption = 'Check Out Options:' TabOrder = 0 IsControl = True object Label4: TLabel Left = 168 Top = 20 Width = 44 Height = 13 Caption = '&Revision:' FocusControl = cmbRevision IsControl = True end object Label5: TLabel Left = 168 Top = 44 Width = 38 Height = 13 Caption = '&Version:' FocusControl = cmbVersion IsControl = True end object cmbRevision: TComboBox Left = 220 Top = 16 Width = 161 Height = 21 Hint = 'Choose the revision to check out from this list' HelpContext = 1005 Style = csDropDownList ItemHeight = 13 ParentShowHint = False ShowHint = False TabOrder = 3 OnChange = RevisionChange OnClick = RevisionChange OnDropDown = RevisionDropDown IsControl = True end object cmbVersion: TComboBox Left = 220 Top = 40 Width = 161 Height = 21 Hint = 'Choose the version to check out from this list' HelpContext = 1005 Style = csDropDownList ItemHeight = 13 ParentShowHint = False ShowHint = False Sorted = True TabOrder = 4 OnChange = VersionChange OnClick = VersionChange OnDropDown = VersionDropDown IsControl = True end object rbLock: TRadioButton Left = 8 Top = 56 Width = 137 Height = 20 Hint = 'Check out a writable copy of a revision and lock it' HelpContext = 1005 Caption = 'Writable and Locked' Checked = True ParentShowHint = False ShowHint = False TabOrder = 0 TabStop = True IsControl = True end object rbReadOnly: TRadioButton Left = 8 Top = 16 Width = 137 Height = 20 Hint = 'Check out a read-only copy of a revision' HelpContext = 1005 Caption = 'Read Only' ParentShowHint = False ShowHint = False TabOrder = 1 IsControl = True end object rbWritable: TRadioButton Left = 8 Top = 36 Width = 137 Height = 20 Hint = 'Check out a writable copy of a revision' HelpContext = 1005 Caption = 'Writable' ParentShowHint = False ShowHint = False TabOrder = 2 IsControl = True end end object OKButton: TBitBtn Left = 152 Top = 96 Width = 75 Height = 25 Hint = 'Check out a revision of this file' HelpContext = 1005 Caption = 'OK' Default = True ModalResult = 1 ParentShowHint = False ShowHint = False TabOrder = 1 NumGlyphs = 2 end object CancelButton: TBitBtn Left = 240 Top = 96 Width = 75 Height = 25 Hint = 'Dismiss dialog without checking out a revision' HelpContext = 1005 Cancel = True Caption = 'Cancel' ModalResult = 2 ParentShowHint = False ShowHint = False TabOrder = 2 NumGlyphs = 2 end object HelpButton: TBitBtn Left = 325 Top = 96 Width = 75 Height = 25 Hint = 'Get more detailed help' HelpContext = 1005 Caption = '&Help' ParentShowHint = False ShowHint = False TabOrder = 3 OnClick = HelpButtonClick NumGlyphs = 2 end end end