unitsupdetail_data.dfm
来自「自己做过的工程」· DFM 代码 · 共 203 行
DFM
203 行
object formsupdetail_data: Tformsupdetail_data
Left = 127
Top = 104
BorderStyle = bsDialog
Caption = #23458#20154#25509#24453#24405#20837
ClientHeight = 387
ClientWidth = 549
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 Panel2: TPanel
Left = 0
Top = 313
Width = 549
Height = 74
Align = alBottom
BorderStyle = bsSingle
TabOrder = 0
object but_ok: TButton
Left = 112
Top = 19
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 = 344
Top = 19
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
object Panel1: TPanel
Left = 0
Top = 0
Width = 549
Height = 313
Align = alClient
BorderStyle = bsSingle
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 132
Width = 56
Height = 14
Caption = #23458#20154#22995#21517
end
object Label2: TLabel
Left = 9
Top = 94
Width = 56
Height = 14
Caption = #21253#38388#32534#21495
end
object Label3: TLabel
Left = 40
Top = 172
Width = 28
Height = 14
Caption = #20154#25968
end
object Label4: TLabel
Left = 39
Top = 208
Width = 28
Height = 14
Caption = #22791#27880
end
object Label6: TLabel
Left = 288
Top = 96
Width = 28
Height = 14
Caption = #26700#21495
end
object ed_username: TEdit
Left = 80
Top = 126
Width = 145
Height = 22
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
end
object ed_sroomno: TEdit
Left = 79
Top = 86
Width = 145
Height = 22
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
end
object ed_userno: TEdit
Left = 80
Top = 166
Width = 145
Height = 22
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 2
end
object riched_remark: TRichEdit
Left = 80
Top = 208
Width = 393
Height = 89
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentFont = False
TabOrder = 3
end
object RadioGroup1: TRadioGroup
Left = 48
Top = 8
Width = 457
Height = 65
Caption = #25509#24453#26041#24335
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object rbut_sroom: TRadioButton
Left = 155
Top = 35
Width = 65
Height = 17
Caption = #21253#38388
Checked = True
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
TabStop = True
OnClick = rbut_sroomClick
end
object rbut_table: TRadioButton
Left = 315
Top = 35
Width = 57
Height = 17
Caption = #25955#24231
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = rbut_tableClick
end
object ed_tableno: TEdit
Left = 327
Top = 88
Width = 147
Height = 22
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 7
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?