📄 dlgfileproperties.dfm
字号:
object FilePropertiesDialog: TFilePropertiesDialog
Left = 238
Top = 158
BorderStyle = bsDialog
ClientHeight = 392
ClientWidth = 377
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object pgFileProperties: TPageControl
Left = 8
Top = 8
Width = 361
Height = 345
ActivePage = TabSheet1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabIndex = 0
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'General'
object imgIcon: TImage
Left = 16
Top = 16
Width = 32
Height = 32
Transparent = True
end
object Label1: TLabel
Left = 16
Top = 72
Width = 46
Height = 13
Caption = 'Filename:'
end
object Label2: TLabel
Left = 16
Top = 96
Width = 44
Height = 13
Caption = 'Location:'
end
object Label3: TLabel
Left = 16
Top = 120
Width = 23
Height = 13
Caption = 'Size:'
end
object Label4: TLabel
Left = 16
Top = 160
Width = 73
Height = 13
Caption = 'MS-DOS Name:'
end
object Label5: TLabel
Left = 16
Top = 184
Width = 43
Height = 13
Caption = 'Created:'
end
object Label6: TLabel
Left = 16
Top = 208
Width = 67
Height = 13
Caption = 'Last Modified:'
end
object Label7: TLabel
Left = 16
Top = 232
Width = 60
Height = 13
Caption = 'Last Access:'
end
object Label8: TLabel
Left = 16
Top = 272
Width = 52
Height = 13
Caption = 'Attributes:'
end
object Label19: TLabel
Left = 56
Top = 32
Width = 48
Height = 13
end
object txtFileTitle: TEdit
Left = 56
Top = 16
Width = 265
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 2
Text = 'txtFileTitle'
end
object Panel1: TPanel
Left = 16
Top = 56
Width = 321
Height = 2
BevelOuter = bvLowered
TabOrder = 3
end
object Panel2: TPanel
Left = 16
Top = 144
Width = 321
Height = 2
BevelOuter = bvLowered
TabOrder = 7
end
object chkReadOnly: TCheckBox
Left = 96
Top = 272
Width = 241
Height = 17
Caption = '&Read only'
TabOrder = 0
end
object chkModfified: TCheckBox
Left = 96
Top = 288
Width = 241
Height = 17
Caption = '&Modified'
TabOrder = 1
end
object Panel3: TPanel
Left = 16
Top = 256
Width = 321
Height = 2
BevelOuter = bvLowered
TabOrder = 12
end
object txtMSDOSName: TEdit
Left = 96
Top = 160
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 8
Text = 'txtMSDOSName'
end
object txtCreated: TEdit
Left = 96
Top = 184
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 9
Text = 'txtCreated'
end
object txtLastModified: TEdit
Left = 96
Top = 208
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 10
Text = 'txtLastModified'
end
object txtLastAccess: TEdit
Left = 96
Top = 232
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 11
Text = 'txtLastAccess'
end
object txtSize: TEdit
Left = 96
Top = 120
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 6
Text = 'txtSize'
end
object txtLocation: TEdit
Left = 96
Top = 96
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 5
Text = 'txtLocation'
end
object txtFileName: TEdit
Left = 96
Top = 72
Width = 241
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 4
Text = 'txtFileName'
end
end
object TabSheet2: TTabSheet
Caption = 'Details'
ImageIndex = 1
object Label9: TLabel
Left = 16
Top = 16
Width = 50
Height = 13
Caption = 'Linecount:'
end
object Label10: TLabel
Left = 16
Top = 40
Width = 79
Height = 13
Caption = 'Charactercount:'
end
object Label11: TLabel
Left = 16
Top = 160
Width = 71
Height = 13
Caption = 'Downloadtime:'
end
object Label12: TLabel
Left = 104
Top = 160
Width = 58
Height = 13
Caption = '&Connection:'
FocusControl = cboConnection
end
object Label13: TLabel
Left = 104
Top = 184
Width = 26
Height = 13
Caption = 'Time:'
end
object Label14: TLabel
Left = 312
Top = 160
Width = 20
Height = 13
Caption = 'kB/s'
end
object Label15: TLabel
Left = 16
Top = 68
Width = 50
Height = 13
Caption = '&Linebreak:'
FocusControl = cboLinebreak
end
object Label16: TLabel
Left = 16
Top = 92
Width = 51
Height = 13
Caption = 'Lan&guage:'
FocusControl = cboLanguage
end
object Label17: TLabel
Left = 16
Top = 117
Width = 53
Height = 13
Caption = '&Tab Width:'
end
object Panel4: TPanel
Left = 16
Top = 144
Width = 321
Height = 2
BevelOuter = bvLowered
TabOrder = 6
end
object cboConnection: TComboBox
Left = 184
Top = 156
Width = 121
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 5
Text = '14400'
OnClick = cboConnectionClick
Items.Strings = (
'14400'
'28800'
'56600'
'64000'
'128000'
'1500000'
'1544000'
'4000000')
end
object txtDownTime: TEdit
Left = 184
Top = 184
Width = 153
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 7
Text = 'txtDownTime'
end
object txtCharCount: TEdit
Left = 104
Top = 40
Width = 233
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 1
Text = 'txtCharCount'
end
object txtLineCount: TEdit
Left = 104
Top = 16
Width = 233
Height = 17
TabStop = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 0
Text = 'txtLineCount'
end
object Panel5: TPanel
Left = 16
Top = 208
Width = 321
Height = 2
BevelOuter = bvLowered
TabOrder = 8
end
object cboLinebreak: TComboBox
Left = 104
Top = 64
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnClick = cboLinebreakClick
Items.Strings = (
'DOS/Window (CR+LF)'
'UNIX (LF)'
'Mac (CR)')
end
object cboLanguage: TComboBox
Left = 104
Top = 88
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 3
OnClick = cboLinebreakClick
Items.Strings = (
'<None>')
end
object spnTabWidth: TSpinEdit
Left = 104
Top = 112
Width = 81
Height = 22
MaxValue = 0
MinValue = 0
TabOrder = 4
Value = 0
end
end
end
object btnCancel: TCorelButton
Left = 296
Top = 360
Width = 75
Height = 23
Cancel = True
Caption = 'Cancel'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ModalResult = 2
ParentFont = False
TabOrder = 1
end
object btnOK: TCorelButton
Left = 216
Top = 360
Width = 75
Height = 23
Caption = 'OK'
Default = True
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 2
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -