unit1.dfm
来自「精彩编程百例75~100 其中有媒体播放器 SQL语言编辑器 ADO方法连接多个」· DFM 代码 · 共 108 行
DFM
108 行
object Form1: TForm1
Left = 371
Top = 170
Width = 400
Height = 162
Caption = #23616#22495#32593#20869#20849#20139#25991#20214#36164#28304#30340#19979#36733
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 24
Width = 57
Height = 16
Caption = #28304#25991#20214#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 8
Top = 88
Width = 90
Height = 16
Caption = #26412#22320#25991#20214#22841#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 104
Top = 16
Width = 185
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentFont = False
TabOrder = 0
end
object Edit2: TEdit
Left = 104
Top = 88
Width = 185
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentFont = False
TabOrder = 1
end
object Button1: TButton
Left = 304
Top = 16
Width = 65
Height = 25
Caption = #27983#35272
TabOrder = 2
OnClick = Button1Click
end
object Button3: TButton
Left = 160
Top = 48
Width = 89
Height = 33
Caption = #19979#36733#21040' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button3Click
end
object Button2: TButton
Left = 304
Top = 88
Width = 65
Height = 25
Caption = #36864#20986
TabOrder = 4
OnClick = Button2Click
end
object OpenDialog1: TOpenDialog
Left = 112
Top = 48
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?