unitsetsuptype_data.dfm
来自「自己做过的工程」· DFM 代码 · 共 147 行
DFM
147 行
object formsetsuptype_data: Tformsetsuptype_data
Left = 180
Top = 123
BorderStyle = bsDialog
Caption = #37202#33756#31867#22411#35774#23450
ClientHeight = 347
ClientWidth = 426
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 426
Height = 281
Align = alClient
BorderStyle = bsSingle
TabOrder = 0
object Label1: TLabel
Left = 45
Top = 48
Width = 56
Height = 14
Caption = #37202#33756#31867#22411
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 45
Top = 96
Width = 56
Height = 14
Caption = #31867#22411#20195#21495
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 69
Top = 136
Width = 28
Height = 14
Caption = #22791#27880
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object ed_dicname: TEdit
Left = 111
Top = 40
Width = 218
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object ed_dicvalue: TEdit
Left = 111
Top = 88
Width = 218
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object riched_dicdiscribe: TRichEdit
Left = 111
Top = 136
Width = 217
Height = 97
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
object Panel2: TPanel
Left = 0
Top = 281
Width = 426
Height = 66
Align = alBottom
BorderStyle = bsSingle
TabOrder = 1
object but_ok: TButton
Left = 64
Top = 16
Width = 81
Height = 33
Caption = #30830#23450
Default = True
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = but_okClick
end
object but_cancel: TButton
Left = 200
Top = 16
Width = 81
Height = 33
Caption = #21462#28040
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = but_cancelClick
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?