123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289 |
- object FileSystemInfoDialog: TFileSystemInfoDialog
- Left = 320
- Top = 130
- HelpType = htKeyword
- HelpKeyword = 'ui_fsinfo'
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- BorderStyle = bsDialog
- Caption = 'Server and protocol information'
- ClientHeight = 398
- ClientWidth = 371
- Color = clBtnFace
- ParentFont = True
- OldCreateOrder = True
- Position = poOwnerFormCenter
- OnShow = FormShow
- DesignSize = (
- 371
- 398)
- PixelsPerInch = 96
- TextHeight = 13
- object CloseButton: TButton
- Left = 204
- Top = 364
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'Close'
- Default = True
- ModalResult = 1
- TabOrder = 2
- end
- object HelpButton: TButton
- Left = 287
- Top = 364
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = '&Help'
- TabOrder = 3
- OnClick = HelpButtonClick
- end
- object PageControl: TPageControl
- Left = 0
- Top = 0
- Width = 371
- Height = 352
- ActivePage = ProtocolSheet
- Align = alTop
- Anchors = [akLeft, akTop, akRight, akBottom]
- TabOrder = 0
- OnChange = PageControlChange
- object ProtocolSheet: TTabSheet
- Caption = 'Protocol'
- DesignSize = (
- 363
- 324)
- object HostKeyGroup: TGroupBox
- Left = 6
- Top = 202
- Width = 351
- Height = 41
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'Server host key fingerprint'
- TabOrder = 1
- DesignSize = (
- 351
- 41)
- object HostKeyFingerprintEdit: TEdit
- Left = 10
- Top = 18
- Width = 334
- Height = 17
- TabStop = False
- Anchors = [akLeft, akTop, akRight]
- BorderStyle = bsNone
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 0
- Text = 'HostKeyFingerprintEdit'
- end
- end
- object ServerView: TListView
- Left = 6
- Top = 8
- Width = 351
- Height = 187
- Anchors = [akLeft, akTop, akRight, akBottom]
- Columns = <
- item
- Caption = 'Item'
- Width = 150
- end
- item
- Caption = 'Value'
- Width = 150
- end>
- ColumnClick = False
- DoubleBuffered = True
- MultiSelect = True
- ReadOnly = True
- RowSelect = True
- ParentDoubleBuffered = False
- PopupMenu = ListViewMenu
- TabOrder = 0
- ViewStyle = vsReport
- OnContextPopup = ControlContextPopup
- end
- object CertificateGroup: TGroupBox
- Left = 6
- Top = 246
- Width = 351
- Height = 72
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'Certificate fingerprint'
- TabOrder = 2
- DesignSize = (
- 351
- 72)
- object CertificateFingerprintEdit: TEdit
- Left = 10
- Top = 18
- Width = 334
- Height = 17
- TabStop = False
- Anchors = [akLeft, akTop, akRight]
- BorderStyle = bsNone
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 0
- Text = 'CertificateFingerprintEdit'
- end
- object CertificateViewButton: TButton
- Left = 10
- Top = 37
- Width = 121
- Height = 25
- Caption = '&Full certificate'
- TabOrder = 1
- OnClick = CertificateViewButtonClick
- end
- end
- end
- object CapabilitiesSheet: TTabSheet
- Caption = 'Capabilities'
- ImageIndex = 1
- DesignSize = (
- 363
- 324)
- object InfoGroup: TGroupBox
- Left = 6
- Top = 202
- Width = 351
- Height = 114
- Anchors = [akLeft, akRight, akBottom]
- Caption = 'Additional information'
- TabOrder = 1
- DesignSize = (
- 351
- 114)
- object InfoMemo: TMemo
- Left = 9
- Top = 17
- Width = 333
- Height = 87
- TabStop = False
- Anchors = [akLeft, akTop, akRight]
- BevelInner = bvNone
- BevelOuter = bvNone
- BorderStyle = bsNone
- Color = clBtnFace
- Lines.Strings = (
- 'InfoMemo')
- ScrollBars = ssBoth
- TabOrder = 0
- WordWrap = False
- end
- end
- object ProtocolView: TListView
- Left = 6
- Top = 8
- Width = 351
- Height = 187
- Anchors = [akLeft, akTop, akRight, akBottom]
- Columns = <
- item
- Caption = 'Item'
- Width = 150
- end
- item
- Caption = 'Value'
- Width = 150
- end>
- ColumnClick = False
- DoubleBuffered = True
- MultiSelect = True
- ReadOnly = True
- RowSelect = True
- ParentDoubleBuffered = False
- PopupMenu = ListViewMenu
- TabOrder = 0
- ViewStyle = vsReport
- OnContextPopup = ControlContextPopup
- end
- end
- object SpaceAvailableSheet: TTabSheet
- Caption = 'Space available'
- ImageIndex = 2
- DesignSize = (
- 363
- 324)
- object Label1: TLabel
- Left = 13
- Top = 13
- Width = 26
- Height = 13
- Caption = '&Path:'
- FocusControl = SpaceAvailablePathEdit
- end
- object SpaceAvailableView: TListView
- Left = 6
- Top = 40
- Width = 351
- Height = 155
- Anchors = [akLeft, akTop, akRight, akBottom]
- Columns = <
- item
- Caption = 'Item'
- Width = 150
- end
- item
- Caption = 'Value'
- Width = 150
- end>
- ColumnClick = False
- DoubleBuffered = True
- MultiSelect = True
- ReadOnly = True
- RowSelect = True
- ParentDoubleBuffered = False
- PopupMenu = ListViewMenu
- TabOrder = 2
- ViewStyle = vsReport
- OnContextPopup = ControlContextPopup
- OnCustomDrawItem = SpaceAvailableViewCustomDrawItem
- end
- object SpaceAvailablePathEdit: TEdit
- Left = 56
- Top = 9
- Width = 193
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 250
- TabOrder = 0
- OnChange = ControlChange
- OnEnter = SpaceAvailablePathEditEnter
- OnExit = SpaceAvailablePathEditExit
- end
- object SpaceAvailableButton: TButton
- Left = 256
- Top = 7
- Width = 99
- Height = 25
- Anchors = [akTop, akRight]
- Caption = 'Check &space'
- TabOrder = 1
- OnClick = SpaceAvailableButtonClick
- end
- end
- end
- object ClipboardButton: TButton
- Left = 8
- Top = 364
- Width = 121
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = '&Copy to Clipboard'
- TabOrder = 1
- OnClick = ClipboardButtonClick
- end
- object ListViewMenu: TPopupMenu
- Left = 151
- Top = 354
- object Copy: TMenuItem
- Caption = '&Copy'
- OnClick = CopyClick
- end
- end
- end
|