unit1.dfm
来自「精彩编程百例26~50 其中有 控制任务栏 windows底层任务控制 屏保预览」· DFM 代码 · 共 110 行
DFM
110 行
object Form1: TForm1
Left = 192
Top = 114
Width = 658
Height = 522
Caption = #23631#20445#39044#35272
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel2: TPanel
Left = 0
Top = 0
Width = 650
Height = 313
Align = alTop
BevelInner = bvLowered
BorderWidth = 1
BorderStyle = bsSingle
Color = clMenu
TabOrder = 0
end
object Panel1: TPanel
Left = 0
Top = 313
Width = 650
Height = 175
Align = alClient
Color = clGradientInactiveCaption
TabOrder = 1
object DriveComboBox1: TDriveComboBox
Left = 32
Top = 16
Width = 145
Height = 19
DirList = DirectoryListBox1
TabOrder = 0
end
object DirectoryListBox1: TDirectoryListBox
Left = 32
Top = 32
Width = 145
Height = 137
FileList = FileListBox1
ItemHeight = 16
TabOrder = 1
end
object FileListBox1: TFileListBox
Left = 200
Top = 16
Width = 145
Height = 153
ItemHeight = 13
Mask = '*.scr'
TabOrder = 2
OnDblClick = FileListBox1DblClick
end
object ListBox1: TListBox
Left = 376
Top = 16
Width = 121
Height = 153
ItemHeight = 13
TabOrder = 3
end
object Button1: TButton
Left = 552
Top = 16
Width = 75
Height = 25
Caption = #38544#34255#23631#20445
TabOrder = 4
OnClick = Button1Click
end
object Button2: TButton
Left = 552
Top = 56
Width = 75
Height = 25
Caption = #26174#31034#23631#20445
TabOrder = 5
OnClick = Button2Click
end
object Button3: TButton
Left = 552
Top = 96
Width = 75
Height = 25
Caption = #20851#38381#23631#20445
TabOrder = 6
OnClick = Button3Click
end
object Button4: TButton
Left = 552
Top = 136
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 7
OnClick = Button4Click
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?